/ BBS in a Box 9 / AMUG BBS in a Box Volume IX (August 1993) (MacWizards).iso / Files / Prog / S / ShowOff.cpt / ShowOff 7-1.pas

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 92 26 00 01 47 7b 2a 2a | 2a 20 54 48 49 53 20 49 |.&..G{**|* THIS I|
|00000010| 53 20 54 48 45 20 43 4f | 4e 56 45 52 53 49 4f 4e |S THE CO|NVERSION|
|00000020| 20 4f 46 20 4c 49 53 54 | 49 4e 47 20 37 2d 31 20 | OF LIST|ING 7-1 |
|00000030| 4f 46 20 22 48 4f 57 20 | 54 4f 20 57 52 49 54 45 |OF "HOW |TO WRITE|
|00000040| 20 4d 41 43 49 4e 54 4f | 53 48 20 7d 92 26 00 01 | MACINTO|SH }.&..|
|00000050| 46 7b 2a 2a 2a 20 53 4f | 46 54 57 41 52 45 22 2e |F{*** SO|FTWARE".|
|00000060| 20 20 54 48 49 53 20 56 | 45 52 53 49 4f 4e 20 48 |  THIS V|ERSION H|
|00000070| 41 53 20 41 4c 4c 20 54 | 48 45 20 43 4f 4e 56 45 |AS ALL T|HE CONVE|
|00000080| 52 53 49 4f 4e 53 20 46 | 4f 52 20 4c 49 47 48 54 |RSIONS F|OR LIGHT|
|00000090| 53 50 45 45 44 20 7d 15 | 92 24 00 01 43 7b 2a 2a |SPEED }.|.$..C{**|
|000000a0| 2a 20 50 41 53 43 41 4c | 20 20 3d 3d 20 42 55 54 |* PASCAL|  == BUT|
|000000b0| 20 53 54 49 4c 4c 20 43 | 4f 4e 54 41 49 4e 53 20 | STILL C|ONTAINS |
|000000c0| 41 4c 4c 20 54 48 45 20 | 42 55 47 53 20 3d 3d 20 |ALL THE |BUGS == |
|000000d0| 46 4f 52 20 55 53 45 20 | 49 4e 20 54 48 45 20 7d |FOR USE |IN THE }|
|000000e0| 92 15 00 01 24 7b 2a 2a | 2a 20 44 45 42 55 47 47 |....${**|* DEBUGG|
|000000f0| 49 4e 47 20 53 45 53 53 | 49 4f 4e 20 49 4e 20 54 |ING SESS|ION IN T|
|00000100| 48 45 20 42 4f 4f 4b 2e | 7d 20 94 01 92 20 00 01 |HE BOOK.|} ... ..|
|00000110| 3a 7b 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |:{======|========|
|00000120| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000130| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000140| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 7d 6c 92 28 00 01 |========|==}l.(..|
|00000150| 4a 7b 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |J{      |        |
|00000160| 20 20 3d 3d 3d 20 49 6e | 73 74 72 75 63 74 69 6f |  === In|structio|
|00000170| 6e 73 20 46 6f 72 20 52 | 75 6e 6e 69 6e 67 20 55 |ns For R|unning U|
|00000180| 6e 64 65 72 20 4c 69 67 | 68 74 53 70 65 65 64 20 |nder Lig|htSpeed |
|00000190| 50 61 73 63 61 6c 20 3d | 3d 3d 7d 68 94 01 92 1c |Pascal =|==}h....|
|000001a0| 00 01 33 7b 20 20 31 29 | 20 53 65 6c 65 63 74 20 |..3{  1)| Select |
|000001b0| 27 4e 45 57 20 50 52 4f | 4a 45 43 54 27 20 66 72 |'NEW PRO|JECT' fr|
|000001c0| 6f 6d 20 74 68 65 20 27 | 50 52 4f 4a 45 43 54 20 |om the '|PROJECT |
|000001d0| 6d 65 6e 75 2e 7d 92 2c | 00 01 53 7b 20 20 32 29 |menu.}.,|..S{  2)|
|000001e0| 20 41 64 64 20 74 68 69 | 73 20 66 69 6c 65 20 74 | Add thi|s file t|
|000001f0| 6f 20 74 68 65 20 70 72 | 6f 6a 65 63 74 20 75 73 |o the pr|oject us|
|00000200| 69 6e 67 20 74 68 65 20 | 27 41 44 44 20 46 49 4c |ing the |'ADD FIL|
|00000210| 45 27 20 73 65 6c 65 63 | 74 69 6f 6e 20 75 6e 64 |E' selec|tion und|
|00000220| 65 72 20 27 50 52 4f 4a | 45 43 54 27 2e 7d 92 29 |er 'PROJ|ECT'.}.)|
|00000230| 00 01 4d 7b 20 20 33 29 | 20 43 68 6f 6f 73 65 20 |..M{  3)| Choose |
|00000240| 74 68 65 20 27 52 55 4e | 20 4f 50 54 49 4f 4e 53 |the 'RUN| OPTIONS|
|00000250| 27 20 75 6e 64 65 72 20 | 27 50 52 4f 4a 45 43 54 |' under |'PROJECT|
|00000260| 27 20 61 6e 64 20 70 69 | 63 6b 20 27 75 73 65 20 |' and pi|ck 'use |
|00000270| 72 65 73 6f 75 72 63 65 | 20 66 69 6c 65 27 2e 7d |resource| file'.}|
|00000280| 92 27 00 01 49 7b 20 20 | 20 20 20 20 20 50 69 63 |.'..I{  |     Pic|
|00000290| 6b 20 74 68 65 20 72 65 | 73 6f 75 72 63 65 20 66 |k the re|source f|
|000002a0| 69 6c 65 20 27 53 68 6f | 77 4f 66 66 20 37 2d 31 |ile 'Sho|wOff 7-1|
|000002b0| 2e 52 73 72 73 27 20 66 | 6f 72 20 75 73 65 20 77 |.Rsrs' f|or use w|
|000002c0| 68 65 6e 20 63 6f 6d 70 | 69 6c 69 6e 67 7d 94 01 |hen comp|iling}..|
|000002d0| 92 1d 00 01 35 7b 54 68 | 61 74 27 73 20 61 6c 6c |....5{Th|at's all|
|000002e0| 20 74 68 65 72 65 20 69 | 73 20 74 6f 20 67 65 74 | there i|s to get|
|000002f0| 74 69 6e 67 20 69 74 20 | 74 6f 20 72 75 6e 2c 20 |ting it |to run, |
|00000300| 68 61 76 65 20 66 75 6e | 2e 7d 92 20 00 01 3a 7b |have fun|.}. ..:{|
|00000310| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000320| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000330| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000340| 3d 3d 3d 3d 3d 3d 3d 3d | 7d 67 94 01 92 2f 00 01 |========|}g.../..|
|00000350| 59 7b 54 68 69 73 20 69 | 73 20 74 68 65 20 64 65 |Y{This i|s the de|
|00000360| 62 75 67 67 69 6e 67 20 | 65 78 65 72 63 69 73 65 |bugging |exercise|
|00000370| 20 70 72 6f 67 72 61 6d | 20 22 53 48 4f 57 4f 46 | program| "SHOWOF|
|00000380| 46 22 20 66 72 6f 6d 20 | 22 48 6f 77 20 74 6f 20 |F" from |"How to |
|00000390| 57 72 69 74 65 20 4d 61 | 63 69 6e 74 6f 73 68 20 |Write Ma|cintosh |
|000003a0| 50 72 6f 67 72 61 6d 73 | 22 7d 94 01 92 20 00 01 |Programs|"}... ..|
|000003b0| 3a 7b 54 68 69 73 20 76 | 65 72 73 69 6f 6e 20 69 |:{This v|ersion i|
|000003c0| 73 20 63 6f 6e 66 69 67 | 75 72 65 64 20 74 6f 20 |s config|ured to |
|000003d0| 72 75 6e 20 77 69 74 68 | 20 4c 69 67 68 74 53 70 |run with| LightSp|
|000003e0| 65 65 64 20 50 61 73 63 | 61 6c 7d 65 92 28 00 01 |eed Pasc|al}e.(..|
|000003f0| 4b 7b 45 6e 74 65 72 65 | 64 20 61 6e 64 20 6d 6f |K{Entere|d and mo|
|00000400| 64 69 66 69 65 64 20 62 | 79 20 53 74 65 70 68 65 |dified b|y Stephe|
|00000410| 6e 20 53 63 61 6e 64 61 | 6c 69 73 20 2d 20 53 75 |n Scanda|lis - Su|
|00000420| 6e 6e 79 76 61 6c 65 20 | 43 41 20 2d 20 4d 61 72 |nnyvale |CA - Mar|
|00000430| 63 68 20 31 35 2c 20 31 | 39 38 37 7d 94 01 92 2b |ch 15, 1|987}...+|
|00000440| 00 01 51 7b 49 6e 20 6f | 72 64 65 72 20 74 6f 20 |..Q{In o|rder to |
|00000450| 6d 61 6b 65 20 74 68 65 | 20 70 72 6f 67 72 61 6d |make the| program|
|00000460| 20 77 6f 72 6b 20 75 6e | 64 65 72 20 74 68 65 20 | work un|der the |
|00000470| 4c 69 67 68 74 53 70 65 | 65 64 20 50 61 73 63 61 |LightSpe|ed Pasca|
|00000480| 6c 20 63 6f 6d 70 69 6c | 65 72 2c 20 73 65 76 65 |l compil|er, seve|
|00000490| 72 61 6c 7d 92 2a 00 01 | 4e 7b 6c 69 6e 65 73 20 |ral}.*..|N{lines |
|000004a0| 6f 66 20 63 6f 64 65 20 | 68 61 76 65 20 62 65 65 |of code |have bee|
|000004b0| 6e 20 6d 6f 64 69 66 69 | 65 64 20 77 69 74 68 20 |n modifi|ed with |
|000004c0| 61 20 70 72 6f 67 72 61 | 6d 6d 69 6e 67 20 73 74 |a progra|mming st|
|000004d0| 79 6c 65 20 63 61 6c 6c | 65 64 20 27 63 6f 65 72 |yle call|ed 'coer|
|000004e0| 63 69 6f 6e 27 2e 7d 69 | 92 29 00 01 4d 7b 27 43 |cion'.}i|.)..M{'C|
|000004f0| 6f 65 72 63 69 6f 6e 27 | 20 6d 61 6b 65 73 20 50 |oercion'| makes P|
|00000500| 61 73 63 61 6c 20 61 63 | 63 65 70 74 20 69 6e 63 |ascal ac|cept inc|
|00000510| 6f 6d 70 61 74 69 62 6c | 65 20 27 74 79 70 65 73 |ompatibl|e 'types|
|00000520| 27 20 69 6e 20 61 20 72 | 6f 75 6e 64 61 62 6f 75 |' in a r|oundabou|
|00000530| 74 20 6d 61 6e 6e 65 72 | 2e 7d 92 2c 00 01 52 7b |t manner|.}.,..R{|
|00000540| 46 6f 72 20 6d 6f 73 74 | 20 63 6f 6e 76 65 72 69 |For most| converi|
|00000550| 73 6f 6e 73 20 49 20 68 | 61 76 65 20 74 72 69 65 |sons I h|ave trie|
|00000560| 64 20 74 6f 20 69 6e 63 | 6c 75 64 65 20 74 68 65 |d to inc|lude the|
|00000570| 20 6f 72 69 67 69 6e 61 | 6c 20 63 6f 64 65 2c 20 | origina|l code, |
|00000580| 63 6f 6d 6d 65 6e 74 65 | 64 20 6f 75 74 20 6f 66 |commente|d out of|
|00000590| 7d 69 92 2e 00 01 56 7b | 74 68 65 20 63 6f 64 65 |}i....V{|the code|
|000005a0| 2c 20 61 73 20 77 65 6c | 6c 20 61 73 20 61 20 63 |, as wel|l as a c|
|000005b0| 6f 6d 6d 65 6e 74 20 70 | 6f 69 6e 74 69 6e 67 20 |omment p|ointing |
|000005c0| 6f 75 74 20 74 68 65 20 | 27 63 6f 65 72 63 65 64 |out the |'coerced|
|000005d0| 27 20 73 74 61 74 65 6d | 65 6e 74 73 2e 20 20 49 |' statem|ents.  I|
|000005e0| 6e 20 74 68 65 20 65 76 | 65 6e 74 20 7d 77 92 30 |n the ev|ent }w.0|
|000005f0| 00 01 5a 7b 74 68 61 74 | 20 61 20 6c 69 6e 65 20 |..Z{that| a line |
|00000600| 68 61 73 20 6e 6f 74 20 | 62 65 65 6e 20 70 6f 69 |has not |been poi|
|00000610| 6e 74 65 64 20 6f 75 74 | 20 69 6e 20 74 68 69 73 |nted out| in this|
|00000620| 20 63 6f 6e 76 65 72 73 | 69 6f 6e 2c 20 61 20 63 | convers|ion, a c|
|00000630| 61 72 65 66 75 6c 20 6c | 6f 6f 6b 20 61 74 20 74 |areful l|ook at t|
|00000640| 68 65 20 6f 72 69 67 69 | 6e 61 6c 20 7d 56 92 2d |he origi|nal }V.-|
|00000650| 00 01 55 7b 6c 69 73 74 | 69 6e 67 20 69 6e 20 74 |..U{list|ing in t|
|00000660| 68 65 20 62 6f 6f 6b 20 | 27 48 6f 77 20 54 6f 20 |he book |'How To |
|00000670| 57 72 69 74 65 20 4d 61 | 63 69 6e 74 6f 73 68 20 |Write Ma|cintosh |
|00000680| 53 6f 66 74 77 61 72 65 | 27 20 73 68 6f 75 6c 64 |Software|' should|
|00000690| 20 66 6c 75 73 68 20 6f | 75 74 20 74 68 65 20 6f | flush o|ut the o|
|000006a0| 74 68 65 72 73 2e 20 7d | 94 01 ae 10 00 00 00 00 |thers. }|........|
|000006b0| 00 00 07 53 68 6f 77 6f | 66 66 80 00 45 1c 00 00 |...Showo|ff..E...|
|000006c0| 00 00 08 98 00 00 00 00 | 00 00 98 01 94 01 92 26 |........|.......&|
|000006d0| 00 01 46 7b 49 20 4c 45 | 46 54 20 4f 55 54 20 54 |..F{I LE|FT OUT T|
|000006e0| 48 45 20 27 55 53 45 53 | 27 20 53 45 43 54 49 4f |HE 'USES|' SECTIO|
|000006f0| 4e 20 4f 46 20 54 48 45 | 20 50 52 4f 47 52 41 4d |N OF THE| PROGRAM|
|00000700| 20 46 4f 52 20 55 53 45 | 20 57 49 54 48 20 4c 49 | FOR USE| WITH LI|
|00000710| 47 48 54 53 50 45 45 44 | 7d 5f 92 28 00 01 4a 7b |GHTSPEED|}_.(..J{|
|00000720| 4c 69 67 68 74 53 70 65 | 65 64 20 64 65 66 69 6e |LightSpe|ed defin|
|00000730| 65 73 20 74 68 65 20 69 | 6e 74 65 72 66 61 63 65 |es the i|nterface|
|00000740| 73 20 77 69 74 68 20 74 | 68 65 20 73 74 61 6e 64 |s with t|he stand|
|00000750| 61 72 64 20 6c 69 62 61 | 72 69 65 73 20 27 4d 61 |ard liba|ries 'Ma|
|00000760| 63 50 61 73 4c 69 62 27 | 7d 01 92 0b 00 01 10 7b |cPasLib'|}......{|
|00000770| 61 6e 64 20 27 4d 61 63 | 54 72 61 70 73 27 7d ad |and 'Mac|Traps'}.|
|00000780| 94 01 94 01 a2 01 94 01 | 92 29 00 01 4d 7b 52 65 |........|.)..M{Re|
|00000790| 73 6f 75 72 63 65 73 20 | 20 66 6f 72 20 4d 45 4e |sources | for MEN|
|000007a0| 55 73 20 61 6e 64 20 44 | 49 41 4c 4f 47 53 20 61 |Us and D|IALOGS a|
|000007b0| 72 65 20 64 65 66 69 6e | 65 64 20 69 6e 20 74 68 |re defin|ed in th|
|000007c0| 65 20 72 65 73 6f 75 72 | 63 65 20 66 69 6c 65 20 |e resour|ce file |
|000007d0| 69 6e 63 6c 75 64 65 64 | 20 7d 92 27 00 01 49 7b |included| }.'..I{|
|000007e0| 77 69 74 68 20 74 68 69 | 73 20 76 65 72 73 69 6f |with thi|s versio|
|000007f0| 6e 20 6f 66 20 27 53 68 | 6f 77 4f 66 66 27 2e 20 |n of 'Sh|owOff'. |
|00000800| 20 54 68 65 20 66 69 6c | 65 20 6e 61 6d 65 20 69 | The fil|e name i|
|00000810| 73 20 27 53 68 6f 77 4f | 66 66 20 37 2d 31 2e 52 |s 'ShowO|ff 7-1.R|
|00000820| 73 72 73 27 2e 20 20 7d | 92 27 00 01 48 7b 54 68 |srs'.  }|.'..H{Th|
|00000830| 65 20 72 65 73 6f 75 72 | 63 65 20 66 69 6c 65 20 |e resour|ce file |
|00000840| 4d 55 53 54 20 62 65 20 | 69 6e 63 6c 75 64 65 64 |MUST be |included|
|00000850| 20 69 6e 20 74 68 65 20 | 52 55 4e 20 4f 50 54 49 | in the |RUN OPTI|
|00000860| 4f 4e 53 20 66 6f 72 20 | 74 68 65 20 70 72 6f 67 |ONS for |the prog|
|00000870| 72 61 6d 20 7d 01 92 0e | 00 01 16 7b 74 6f 20 6f |ram }...|...{to o|
|00000880| 70 65 72 61 74 65 20 63 | 6f 72 72 65 63 74 6c 79 |perate c|orrectly|
|00000890| 7d 34 94 01 94 01 b4 07 | 09 24 08 f0 07 61 70 70 |}4......|.$...app|
|000008a0| 6c 65 49 44 78 05 00 00 | 00 00 03 00 00 80 98 01 |leIDx...|........|
|000008b0| 92 1f 00 00 38 20 09 7b | 72 65 73 6f 75 72 63 65 |....8 .{|resource|
|000008c0| 20 49 44 73 2f 6d 65 6e | 75 20 49 44 73 20 66 6f | IDs/men|u IDs fo|
|000008d0| 72 20 41 70 70 6c 65 2c | 20 46 69 6c 65 20 61 6e |r Apple,| File an|
|000008e0| 64 20 45 64 69 74 20 6d | 65 6e 75 73 7d 65 b4 07 |d Edit m|enus}e..|
|000008f0| 09 0a 09 b6 06 66 69 6c | 65 49 44 08 78 05 00 00 |.....fil|eID.x...|
|00000900| 00 00 03 00 00 81 98 01 | b4 07 09 5c 09 ce 06 65 |........|...\...e|
|00000910| 64 69 74 49 44 08 78 05 | 00 00 00 00 03 00 00 82 |ditID.x.|........|
|00000920| 98 01 b4 07 00 00 0a 24 | 07 41 62 6f 75 74 49 44 |.......$|.AboutID|
|00000930| 78 05 00 00 00 00 03 00 | 05 dc 98 01 92 0e 00 00 |x.......|........|
|00000940| 16 09 09 7b 41 42 4f 55 | 54 20 6d 65 6e 75 20 69 |...{ABOU|T menu i|
|00000950| 74 65 6d 20 49 44 7d 8b | 94 01 b4 07 00 00 0a 9a |tem ID}.|........|
|00000960| 06 61 70 70 6c 65 4d 08 | 78 05 00 00 00 00 03 00 |.appleM.|x.......|
|00000970| 00 01 98 01 92 20 00 00 | 3a 09 09 7b 69 6e 64 65 |..... ..|:..{inde|
|00000980| 78 20 66 6f 72 20 65 61 | 63 68 20 6d 65 6e 75 20 |x for ea|ch menu |
|00000990| 69 6e 20 6d 79 4d 65 6e | 75 73 20 28 61 72 72 61 |in myMen|us (arra|
|000009a0| 79 20 6f 66 20 6d 65 6e | 75 20 68 61 6e 64 6c 65 |y of men|u handle|
|000009b0| 73 29 7d 41 b4 06 00 00 | 09 e8 05 66 69 6c 65 4d |s)}A....|...fileM|
|000009c0| 78 05 00 00 00 00 03 00 | 00 02 98 01 b4 06 00 00 |x.......|........|
|000009d0| 0e 82 05 65 64 69 74 4d | 78 05 00 00 00 00 03 00 |...editM|x.......|
|000009e0| 00 03 98 01 94 01 b4 08 | 0c 1a 0a 5e 09 6d 65 6e |........|...^.men|
|000009f0| 75 43 6f 75 6e 74 78 05 | 00 00 00 00 03 00 00 03 |uCountx.|........|
|00000a00| 98 01 92 0f 00 00 19 09 | 09 7b 74 6f 74 61 6c 20 |........|.{total |
|00000a10| 6e 75 6d 62 65 72 20 6f | 66 20 6d 65 6e 75 73 7d |number o|f menus}|
|00000a20| 94 01 b4 08 00 00 00 00 | 09 61 62 6f 75 74 49 74 |........|.aboutIt|
|00000a30| 65 6d 78 05 00 00 00 00 | 03 00 00 01 98 01 92 0e |emx.....|........|
|00000a40| 00 00 16 09 09 7b 69 74 | 65 6d 20 69 6e 20 41 70 |.....{it|em in Ap|
|00000a50| 70 6c 65 20 6d 65 6e 75 | 7d 00 94 01 b4 08 0a d0 |ple menu|}.......|
|00000a60| 0b 7a 08 75 6e 64 6f 49 | 74 65 6d 08 78 05 00 00 |.z.undoI|tem.x...|
|00000a70| 00 00 03 00 00 01 98 01 | 92 10 00 00 1b 09 09 09 |........|........|
|00000a80| 7b 69 74 65 6d 73 20 69 | 6e 20 74 68 65 20 45 64 |{items i|n the Ed|
|00000a90| 69 74 20 6d 65 6e 75 7d | b4 07 0a b4 0d 18 07 63 |it menu}|.......c|
|00000aa0| 75 74 49 74 65 6d 78 05 | 00 00 00 00 03 00 00 03 |utItemx.|........|
|00000ab0| 98 01 b4 08 0a ec 00 00 | 08 63 6f 70 79 49 74 65 |........|.copyIte|
|00000ac0| 6d 08 78 05 00 00 00 00 | 03 00 00 04 98 01 b4 08 |m.x.....|........|
|00000ad0| 0b 0a 0b 5c 09 70 61 73 | 74 65 49 74 65 6d 78 05 |...\.pas|teItemx.|
|00000ae0| 00 00 00 00 03 00 00 05 | 98 01 b4 08 0c 92 0b 40 |........|.......@|
|00000af0| 09 63 6c 65 61 72 49 74 | 65 6d 78 05 00 00 00 00 |.clearIt|emx.....|
|00000b00| 03 00 00 06 98 01 94 01 | b4 07 0c b0 11 00 07 6e |........|.......n|
|00000b10| 65 77 49 74 65 6d 78 05 | 00 00 00 00 03 00 00 01 |ewItemx.|........|
|00000b20| 98 01 92 0e 00 00 17 09 | 09 09 7b 69 74 65 6d 73 |........|..{items|
|00000b30| 20 69 6e 20 46 69 6c 65 | 20 6d 65 6e 75 7d b4 08 | in File| menu}..|
|00000b40| 00 00 00 00 09 63 6c 6f | 73 65 49 74 65 6d 78 05 |.....clo|seItemx.|
|00000b50| 00 00 00 00 03 00 00 02 | 98 01 b4 08 00 00 0c 5c |........|.......\|
|00000b60| 08 71 75 69 74 49 74 65 | 6d 08 78 05 00 00 00 00 |.quitIte|m.x.....|
|00000b70| 03 00 00 04 98 01 94 01 | b4 06 0b ba 0f 8c 05 77 |........|.......w|
|00000b80| 4e 61 6d 65 78 08 00 00 | 00 00 05 00 07 57 69 6e |Namex...|.....Win|
|00000b90| 64 6f 77 20 98 01 92 10 | 00 00 1a 09 7b 70 72 65 |dow ....|....{pre|
|00000ba0| 66 69 78 20 66 6f 72 20 | 77 69 6e 64 6f 77 20 6e |fix for |window n|
|00000bb0| 61 6d 65 73 7d 04 94 01 | b4 07 10 9a 0b fe 06 77 |ames}...|.......w|
|00000bc0| 69 6e 64 44 58 08 78 05 | 00 00 00 00 03 00 00 19 |indDX.x.|........|
|00000bd0| 98 01 92 15 00 00 25 09 | 09 09 7b 64 69 73 74 61 |......%.|..{dista|
|00000be0| 6e 63 65 20 74 6f 20 6d | 6f 76 65 20 66 6f 72 20 |nce to m|ove for |
|00000bf0| 6e 65 77 20 77 69 6e 64 | 6f 77 73 7d b4 07 00 00 |new wind|ows}....|
|00000c00| 00 00 06 77 69 6e 64 44 | 59 08 78 05 00 00 00 00 |...windD|Y.x.....|
|00000c10| 03 00 00 19 98 01 94 01 | b4 08 1e f4 00 00 08 6c |........|.......l|
|00000c20| 65 66 74 45 64 67 65 08 | 78 05 00 00 00 00 03 00 |eftEdge.|x.......|
|00000c30| 00 0a 98 01 92 13 00 00 | 20 09 09 7b 69 6e 69 74 |........| ..{init|
|00000c40| 69 61 6c 20 64 69 6d 65 | 6e 73 69 6f 6e 73 20 6f |ial dime|nsions o|
|00000c50| 66 20 77 69 6e 64 6f 77 | 7d 00 b4 07 0c 76 0d 86 |f window|}....v..|
|00000c60| 07 74 6f 70 45 64 67 65 | 78 05 00 00 00 00 03 00 |.topEdge|x.......|
|00000c70| 00 2a 98 01 b4 08 00 00 | 0d e6 09 72 69 67 68 74 |.*......|...right|
|00000c80| 45 64 67 65 78 05 00 00 | 00 00 03 00 00 d2 98 01 |Edgex...|........|
|00000c90| b4 07 00 00 00 00 07 62 | 6f 74 45 64 67 65 78 05 |.......b|otEdgex.|
|00000ca0| 00 00 00 00 03 00 00 af | 98 01 94 01 ba 01 7c 0b |........|......|.|
|00000cb0| 0f 36 0f f2 07 6d 79 4d | 65 6e 75 73 12 00 0c c8 |.6...myM|enus....|
|00000cc0| fd 4c 0c b4 a6 01 b6 19 | 48 00 00 0c 0c e8 0c d0 |.L......|H.......|
|00000cd0| 44 00 00 01 00 03 03 00 | 00 01 00 00 09 fc 09 6d |D.......|.......m|
|00000ce0| 65 6e 75 43 6f 75 6e 74 | 40 00 51 1b 0a 4d 65 6e |enuCount|@.Q..Men|
|00000cf0| 75 48 61 6e 64 6c 65 08 | 98 01 92 0e 00 00 17 20 |uHandle.|....... |
|00000d00| 7b 68 61 6e 64 6c 65 73 | 20 74 6f 20 74 68 65 20 |{handles| to the |
|00000d10| 6d 65 6e 75 73 7d 7c 0c | 0e da 00 00 08 64 72 61 |menus}|.|.....dra|
|00000d20| 67 52 65 63 74 08 12 00 | 0d 32 fd 44 0d 1c a6 01 |gRect...|.2.D....|
|00000d30| 7c 0a 40 00 0b 39 04 52 | 65 63 74 08 00 00 00 00 ||.@..9.R|ect.....|
|00000d40| 00 00 00 00 98 01 92 1f | 00 00 39 09 09 09 7b 72 |........|..9...{r|
|00000d50| 65 63 74 61 6e 67 6c 65 | 20 75 73 65 64 20 74 6f |ectangle| used to|
|00000d60| 20 6d 61 72 6b 20 62 6f | 75 6e 64 72 69 65 73 20 | mark bo|undries |
|00000d70| 66 6f 72 20 64 72 61 67 | 67 69 6e 67 20 77 69 6e |for drag|ging win|
|00000d80| 64 6f 77 7d 7c 0b 00 00 | 00 00 06 74 78 52 65 63 |dow}|...|...txRec|
|00000d90| 74 08 12 00 0d 9e fd 3c | 0d 8a a6 01 7c 0a 40 00 |t......<|....|.@.|
|00000da0| 0b 39 04 52 65 63 74 08 | 00 00 00 00 00 00 00 00 |.9.Rect.|........|
|00000db0| 98 01 92 19 00 00 2d 09 | 09 09 7b 72 65 63 74 61 |......-.|..{recta|
|00000dc0| 6e 67 6c 65 20 66 6f 72 | 20 74 65 78 74 20 69 6e |ngle for| text in|
|00000dd0| 20 61 70 70 6c 69 63 61 | 74 69 6f 6e 20 77 69 6e | applica|tion win|
|00000de0| 64 6f 77 7d 7c 0a 12 1c | 0e 3a 05 74 65 78 74 48 |dow}|...|.:.textH|
|00000df0| 12 00 0d fc fd 38 0d ea | a6 01 7c 0c 40 00 4c 0f |.....8..|..|.@.L.|
|00000e00| 08 54 45 48 61 6e 64 6c | 65 08 00 00 00 00 00 00 |.TEHandl|e.......|
|00000e10| 00 00 98 01 92 12 00 00 | 1f 09 09 09 7b 68 61 6e |........|....{han|
|00000e20| 64 6c 65 20 66 6f 72 20 | 54 65 78 74 45 64 69 74 |dle for |TextEdit|
|00000e30| 20 72 65 63 6f 72 64 7d | 7c 0b 00 00 15 5e 07 74 | record}||....^.t|
|00000e40| 68 65 43 68 61 72 12 00 | 0e 52 fd 36 0e 3e a6 01 |heChar..|.R.6.>..|
|00000e50| 7c 0a 40 00 00 1f 04 63 | 68 61 72 08 00 00 00 00 ||.@....c|har.....|
|00000e60| 00 00 00 00 98 01 92 0d | 00 00 14 09 09 09 7b 74 |........|......{t|
|00000e70| 79 70 65 64 20 63 68 61 | 72 61 63 74 65 72 7d 6c |yped cha|racter}l|
|00000e80| 7c 0b 00 00 00 00 06 65 | 78 74 65 6e 64 08 12 00 ||......e|xtend...|
|00000e90| 0e 9a fd 35 0e 86 a6 01 | 7c 0b 40 00 00 11 07 62 |...5....||.@....b|
|00000ea0| 6f 6f 6c 65 61 6e 00 00 | 00 00 00 00 00 00 98 01 |oolean..|........|
|00000eb0| 92 14 00 00 23 09 09 09 | 7b 74 72 75 65 20 69 66 |....#...|{true if|
|00000ec0| 20 75 73 65 72 20 69 73 | 20 53 68 69 66 74 2d 63 | user is| Shift-c|
|00000ed0| 6c 69 63 6b 69 6e 67 7d | 7c 0c 2b 36 00 00 08 64 |licking}||.+6...d|
|00000ee0| 6f 6e 65 46 6c 61 67 08 | 12 00 0e f4 fd 34 0e de |oneFlag.|.....4..|
|00000ef0| a6 01 7c 0b 40 00 00 11 | 07 62 6f 6f 6c 65 61 6e |..|.@...|.boolean|
|00000f00| 00 00 00 00 00 00 00 00 | 98 01 92 15 00 00 25 09 |........|......%.|
|00000f10| 09 7b 74 72 75 65 20 69 | 66 20 75 73 65 73 20 68 |.{true i|f uses h|
|00000f20| 61 73 20 63 68 6f 73 65 | 6e 20 51 75 69 74 20 49 |as chose|n Quit I|
|00000f30| 74 65 6d 7d 7c 0b 12 74 | 27 28 07 6d 79 45 76 65 |tem}|..t|'(.myEve|
|00000f40| 6e 74 12 00 0f 4e fd 24 | 0f 3a a6 01 7c 0d 40 00 |nt...N.$|.:..|.@.|
|00000f50| 20 6d 0b 45 76 65 6e 74 | 52 65 63 6f 72 64 00 00 | m.Event|Record..|
|00000f60| 00 00 00 00 00 00 98 01 | 92 11 00 00 1d 09 7b 69 |........|......{i|
|00000f70| 6e 66 6f 72 6d 61 74 69 | 6f 6e 20 61 62 6f 75 74 |nformati|on about|
|00000f80| 20 61 6e 20 65 76 65 6e | 74 7d 7c 0b 00 00 00 00 | an even|t}|.....|
|00000f90| 07 77 52 65 63 6f 72 64 | 12 00 0f a4 fc 88 0f 90 |.wRecord|........|
|00000fa0| a6 01 7c 0e 40 00 47 a5 | 0c 57 69 6e 64 6f 77 52 |..|.@.G.|.WindowR|
|00000fb0| 65 63 6f 72 64 08 00 00 | 00 00 00 00 00 00 98 01 |ecord...|........|
|00000fc0| 92 18 00 00 2b 09 7b 69 | 6e 66 6f 72 6d 61 74 69 |....+.{i|nformati|
|00000fd0| 6f 6e 20 61 62 6f 75 74 | 20 74 68 65 20 61 70 70 |on about| the app|
|00000fe0| 6c 69 63 61 74 69 6f 6e | 20 77 69 6e 64 6f 77 7d |lication| window}|
|00000ff0| 7c 0c 00 00 10 42 08 6d | 79 57 69 6e 64 6f 77 08 ||....B.m|yWindow.|
|00001000| 12 00 10 0c fc 84 0f f6 | a6 01 7c 0c 40 00 47 5f |........|..|.@.G_|
|00001010| 09 57 69 6e 64 6f 77 50 | 74 72 00 00 00 00 00 00 |.WindowP|tr......|
|00001020| 00 00 98 01 92 0e 00 00 | 16 09 09 7b 70 6f 69 6e |........|...{poin|
|00001030| 74 65 72 20 74 6f 20 77 | 52 65 63 6f 72 64 7d 69 |ter to w|Record}i|
|00001040| 7c 0c 00 00 14 22 09 6d | 79 57 69 6e 50 65 65 6b ||....".m|yWinPeek|
|00001050| 12 00 10 5c fc 80 10 46 | a6 01 7c 0d 40 00 47 75 |...\...F|..|.@.Gu|
|00001060| 0a 57 69 6e 64 6f 77 50 | 65 65 6b 08 00 00 00 00 |.WindowP|eek.....|
|00001070| 00 00 00 00 98 01 92 11 | 00 00 1d 09 7b 61 6e 6f |........|....{ano|
|00001080| 74 68 65 72 20 70 6f 69 | 6e 74 65 72 20 74 6f 20 |ther poi|nter to |
|00001090| 77 52 65 63 6f 72 64 7d | 7c 0d 00 00 00 00 0b 77 |wRecord}||......w|
|000010a0| 68 69 63 68 57 69 6e 64 | 6f 77 12 00 10 b6 fc 7c |hichWind|ow.....||
|000010b0| 10 9e a6 01 7c 0c 40 00 | 47 5f 09 57 69 6e 64 6f |....|.@.|G_.Windo|
|000010c0| 77 50 74 72 00 00 00 00 | 00 00 00 00 98 01 92 18 |wPtr....|........|
|000010d0| 00 00 2b 09 7b 77 69 6e | 64 6f 77 20 69 6e 20 77 |..+.{win|dow in w|
|000010e0| 68 69 63 68 20 6d 6f 75 | 73 65 20 62 75 74 74 6f |hich mou|se butto|
|000010f0| 6e 20 77 61 73 20 70 72 | 65 73 73 65 64 7d 7c 0c |n was pr|essed}|.|
|00001100| 11 be 11 60 09 6e 65 78 | 74 57 52 65 63 74 12 00 |...`.nex|tWRect..|
|00001110| 11 1a fc 74 11 04 a6 01 | 7c 0a 40 00 0b 39 04 52 |...t....||.@..9.R|
|00001120| 65 63 74 08 00 00 00 00 | 00 00 00 00 98 01 92 18 |ect.....|........|
|00001130| 00 00 2a 09 09 09 7b 70 | 6f 72 74 52 65 63 74 20 |..*...{p|ortRect |
|00001140| 66 6f 72 20 6e 65 78 74 | 20 77 69 6e 64 6f 77 20 |for next| window |
|00001150| 74 6f 20 62 65 20 6f 70 | 65 6e 65 64 7d 7d 7c 0d |to be op|ened}}|.|
|00001160| 00 00 19 ac 0a 6e 65 78 | 74 57 54 69 74 6c 65 08 |.....nex|tWTitle.|
|00001170| 12 00 11 7c fb 74 11 64 | a6 01 7c 0b 40 00 05 1d |...|.t.d|..|.@...|
|00001180| 06 53 74 72 32 35 35 08 | 00 00 00 00 00 00 00 00 |.Str255.|........|
|00001190| 98 01 92 15 00 00 25 09 | 09 7b 74 69 74 6c 65 20 |......%.|.{title |
|000011a0| 6f 66 20 6e 65 78 74 20 | 77 69 6e 64 6f 77 20 74 |of next |window t|
|000011b0| 6f 20 62 65 20 6f 70 65 | 6e 65 64 7d 7c 0c 00 00 |o be ope|ned}|...|
|000011c0| 00 00 08 6e 65 78 74 77 | 4e 75 6d 08 12 00 11 d8 |...nextw|Num.....|
|000011d0| fb 70 11 c2 a6 01 7c 0b | 40 00 00 3f 07 4c 6f 6e |.p....|.|@..?.Lon|
|000011e0| 67 69 6e 74 00 00 00 00 | 00 00 00 00 98 01 92 16 |gint....|........|
|000011f0| 00 00 26 09 09 09 7b 6e | 75 6d 62 65 72 20 6f 66 |..&...{n|umber of|
|00001200| 20 6e 65 78 74 20 77 69 | 6e 64 6f 77 20 28 66 6f | next wi|ndow (fo|
|00001210| 72 20 74 69 74 6c 65 29 | 7d 19 7c 0c 00 00 12 c6 |r title)|}.|.....|
|00001220| 09 73 61 76 65 64 50 6f | 72 74 12 00 12 36 fb 6c |.savedPo|rt...6.l|
|00001230| 12 20 a6 01 7c 0b 40 00 | 11 b7 07 47 72 61 66 50 |. ..|.@.|...GrafP|
|00001240| 74 72 00 00 00 00 00 00 | 00 00 98 01 92 13 00 00 |tr......|........|
|00001250| 21 09 09 09 7b 70 6f 69 | 6e 74 65 72 20 74 6f 20 |!...{poi|nter to |
|00001260| 70 72 65 73 65 72 76 65 | 20 47 72 61 66 50 6f 72 |preserve| GrafPor|
|00001270| 74 7d 7c 0b 00 00 00 00 | 07 6d 65 6e 75 73 4f 4b |t}|.....|.menusOK|
|00001280| 12 00 12 8c fb 6b 12 78 | a6 01 7c 0b 40 00 00 11 |.....k.x|..|.@...|
|00001290| 07 62 6f 6f 6c 65 61 6e | 00 00 00 00 00 00 00 00 |.boolean|........|
|000012a0| 98 01 92 11 00 00 1c 09 | 09 09 7b 66 6f 72 20 64 |........|..{for d|
|000012b0| 69 61 62 6c 69 6e 67 20 | 6d 65 6e 75 20 69 74 65 |iabling |menu ite|
|000012c0| 6d 73 7d 09 7c 0c 00 00 | 12 f8 08 73 63 72 61 70 |ms}.|...|...scrap|
|000012d0| 45 72 72 08 12 00 12 e0 | fb 66 12 ca a6 01 7c 0b |Err.....|.f....|.|
|000012e0| 40 00 00 3f 07 4c 6f 6e | 67 69 6e 74 00 00 00 00 |@..?.Lon|gint....|
|000012f0| 00 00 00 00 98 01 7c 0d | 00 00 16 d8 0a 73 63 72 |......|.|.....scr|
|00001300| 43 6f 70 79 45 72 72 08 | 12 00 13 14 fb 64 12 fc |CopyErr.|.....d..|
|00001310| a6 01 7c 0b 40 00 00 2f | 07 69 6e 74 65 67 65 72 |..|.@../|.integer|
|00001320| 00 00 00 00 00 00 00 00 | 98 01 94 01 92 25 00 01 |........|.....%..|
|00001330| 44 7b 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |D{======|========|
|00001340| 20 53 50 45 43 49 41 4c | 20 56 41 52 49 41 42 4c | SPECIAL| VARIABL|
|00001350| 45 53 20 46 4f 52 20 50 | 41 53 43 41 4c 20 54 59 |ES FOR P|ASCAL TY|
|00001360| 50 45 20 43 4f 45 52 43 | 49 4f 4e 20 3d 3d 3d 3d |PE COERC|ION ====|
|00001370| 3d 3d 3d 3d 7d 4a 92 29 | 00 01 4d 7b 3d 3d 3d 3d |====}J.)|..M{====|
|00001380| 3d 3d 3d 3d 3d 20 52 65 | 71 75 69 72 65 64 20 74 |===== Re|quired t|
|00001390| 6f 20 67 65 74 20 27 53 | 68 6f 77 4f 66 66 27 20 |o get 'S|howOff' |
|000013a0| 74 6f 20 72 75 6e 20 75 | 6e 64 65 72 20 4c 69 67 |to run u|nder Lig|
|000013b0| 68 74 53 70 65 65 64 20 | 50 61 73 63 61 6c 20 20 |htSpeed |Pascal  |
|000013c0| 3d 3d 3d 3d 3d 3d 3d 7d | 92 2b 00 01 50 7b 3d 3d |=======}|.+..P{==|
|000013d0| 3d 3d 3d 3d 3d 20 4f 74 | 68 65 72 20 27 63 6f 65 |===== Ot|her 'coe|
|000013e0| 72 63 69 6f 6e 27 20 76 | 61 72 69 61 62 6c 65 73 |rcion' v|ariables|
|000013f0| 20 61 72 65 20 69 6e 63 | 6c 75 64 65 64 20 69 6e | are inc|luded in|
|00001400| 20 73 70 65 63 69 66 69 | 63 20 72 6f 75 74 69 6e | specifi|c routin|
|00001410| 65 73 20 3d 3d 3d 3d 3d | 3d 3d 3d 3d 7d 86 94 01 |es =====|====}...|
|00001420| 7c 0d 00 00 14 8c 0a 6d | 79 57 69 6e 50 65 65 6b ||......m|yWinPeek|
|00001430| 32 08 12 00 14 3e fb 60 | 14 26 a6 01 7c 0d 40 00 |2....>.`|.&..|.@.|
|00001440| 47 75 0a 57 69 6e 64 6f | 77 50 65 65 6b 08 00 00 |Gu.Windo|wPeek...|
|00001450| 00 00 00 00 00 00 98 01 | 92 19 00 00 2d 09 09 7b |........|....-..{|
|00001460| 74 65 6d 70 20 76 61 72 | 69 61 62 6c 65 20 66 6f |temp var|iable fo|
|00001470| 72 20 75 73 61 67 65 20 | 66 6f 72 20 74 79 70 65 |r usage |for type|
|00001480| 20 63 6f 65 72 63 69 6f | 6e 7d 7c 0d 00 00 14 f6 | coercio|n}|.....|
|00001490| 0a 6d 79 57 69 6e 50 65 | 65 6b 33 08 12 00 14 a8 |.myWinPe|ek3.....|
|000014a0| fb 5c 14 90 a6 01 7c 0d | 40 00 47 75 0a 57 69 6e |.\....|.|@.Gu.Win|
|000014b0| 64 6f 77 50 65 65 6b 08 | 00 00 00 00 00 00 00 00 |dowPeek.|........|
|000014c0| 98 01 92 19 00 00 2d 09 | 09 7b 74 65 6d 70 20 76 |......-.|.{temp v|
|000014d0| 61 72 69 61 62 6c 65 20 | 66 6f 72 20 75 73 61 67 |ariable |for usag|
|000014e0| 65 20 66 6f 72 20 74 79 | 70 65 20 63 6f 65 72 63 |e for ty|pe coerc|
|000014f0| 69 6f 6e 7d 7c 0c 00 00 | 00 00 08 6d 79 57 69 6e |ion}|...|...myWin|
|00001500| 50 74 72 08 12 00 15 10 | fb 58 14 fa a6 01 7c 0c |Ptr.....|.X....|.|
|00001510| 40 00 47 5f 09 57 69 6e | 64 6f 77 50 74 72 00 00 |@.G_.Win|dowPtr..|
|00001520| 00 00 00 00 00 00 98 01 | 92 1a 00 00 2e 09 09 09 |........|........|
|00001530| 7b 74 65 6d 70 20 76 61 | 72 69 61 62 6c 65 20 66 |{temp va|riable f|
|00001540| 6f 72 20 75 73 61 67 65 | 20 66 6f 72 20 74 79 70 |or usage| for typ|
|00001550| 65 20 63 6f 65 72 63 69 | 6f 6e 7d 00 7c 0c 16 2c |e coerci|on}.|..,|
|00001560| 15 c4 09 74 68 65 52 65 | 66 63 6f 6e 12 00 15 78 |...theRe|fcon...x|
|00001570| fb 54 15 62 a6 01 7c 0b | 40 00 00 3f 07 6c 6f 6e |.T.b..|.|@..?.lon|
|00001580| 67 49 6e 74 00 00 00 00 | 00 00 00 00 98 01 92 1a |gInt....|........|
|00001590| 00 00 2f 09 09 09 09 7b | 74 65 6d 70 20 76 61 72 |../....{|temp var|
|000015a0| 69 61 62 6c 65 20 66 6f | 72 20 75 73 61 67 65 20 |iable fo|r usage |
|000015b0| 66 6f 72 20 74 79 70 65 | 20 63 6f 65 72 63 69 6f |for type| coercio|
|000015c0| 6e 7d 7c 0d 00 00 00 00 | 0a 74 68 65 57 69 6e 4b |n}|.....|.theWinK|
|000015d0| 69 6e 64 08 12 00 15 e0 | fb 52 15 c8 a6 01 7c 0b |ind.....|.R....|.|
|000015e0| 40 00 00 2f 07 69 6e 74 | 65 67 65 72 00 00 00 00 |@../.int|eger....|
|000015f0| 00 00 00 00 98 01 92 1a | 00 00 2f 09 09 09 09 7b |........|../....{|
|00001600| 74 65 6d 70 20 76 61 72 | 69 61 62 6c 65 20 66 6f |temp var|iable fo|
|00001610| 72 20 75 73 61 67 65 20 | 66 6f 72 20 74 79 70 65 |r usage |for type|
|00001620| 20 63 6f 65 72 63 69 6f | 6e 7d 7c 0b 00 00 00 00 | coercio|n}|.....|
|00001630| 07 74 68 65 52 65 63 74 | 12 00 16 44 fb 4a 16 30 |.theRect|...D.J.0|
|00001640| a6 01 7c 0a 40 00 0b 39 | 04 52 65 63 74 08 00 00 |..|.@..9|.Rect...|
|00001650| 00 00 00 00 00 00 98 01 | 92 1b 00 00 30 09 09 09 |........|....0...|
|00001660| 09 09 7b 74 65 6d 70 20 | 76 61 72 69 61 62 6c 65 |..{temp |variable|
|00001670| 20 66 6f 72 20 75 73 61 | 67 65 20 66 6f 72 20 74 | for usa|ge for t|
|00001680| 79 70 65 20 63 6f 65 72 | 63 69 6f 6e 7d 00 94 01 |ype coer|cion}...|
|00001690| 92 22 00 01 3e 7b 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |."..>{==|========|
|000016a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000016b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000016c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000016d0| 3d 3d 7d 6f b0 12 17 48 | 00 00 00 00 0a 53 65 74 |==}o...H|.....Set|
|000016e0| 55 70 4d 65 6e 75 73 08 | 81 00 17 48 00 00 01 00 |UpMenus.|...H....|
|000016f0| 17 20 06 ba 00 01 00 00 | 98 01 92 10 00 01 1b 7b |. ......|.......{|
|00001700| 73 65 74 20 75 70 20 6d | 65 6e 75 73 20 61 6e 64 |set up m|enus and|
|00001710| 20 6d 65 6e 75 20 62 61 | 73 7d 94 01 ba 01 7c 08 | menu ba|s}....|.|
|00001720| 00 00 00 00 01 69 12 00 | 17 32 ff ee 17 24 a6 01 |.....i..|.2...$..|
|00001730| 7c 0b 40 00 00 2f 07 69 | 6e 74 65 67 65 72 00 00 ||.@../.i|nteger..|
|00001740| 00 00 00 00 00 00 98 01 | 7e 03 00 00 18 fe 80 15 |........|~.......|
|00001750| 5c 07 6d 79 4d 65 6e 75 | 73 18 5c 06 61 70 70 6c |\.myMenu|s.\.appl|
|00001760| 65 4d 1c 0a 5c 07 47 65 | 74 4d 65 6e 75 10 5c 07 |eM..\.Ge|tMenu.\.|
|00001770| 61 70 70 6c 65 49 44 16 | 98 01 92 0c 00 00 13 09 |appleID.|........|
|00001780| 09 7b 72 65 61 64 20 41 | 70 70 6c 65 20 6d 65 6e |.{read A|pple men|
|00001790| 75 7d 84 15 0a 41 64 64 | 52 65 73 4d 65 6e 75 10 |u}...Add|ResMenu.|
|000017a0| 5c 07 6d 79 4d 65 6e 75 | 73 18 5c 06 61 70 70 6c |\.myMenu|s.\.appl|
|000017b0| 65 4d 1c 12 5a 05 04 44 | 52 56 52 16 98 01 92 11 |eM..Z..D|RVR.....|
|000017c0| 00 00 1c 09 09 7b 61 64 | 64 20 64 65 73 6b 20 61 |.....{ad|d desk a|
|000017d0| 63 63 65 73 73 6f 72 79 | 20 6e 61 6d 65 73 7d 9a |ccessory| names}.|
|000017e0| 80 14 5c 07 6d 79 4d 65 | 6e 75 73 18 5c 05 66 69 |..\.myMe|nus.\.fi|
|000017f0| 6c 65 4d 1c 0a 5c 07 47 | 65 74 4d 65 6e 75 10 5c |leM..\.G|etMenu.\|
|00001800| 06 66 69 6c 65 49 44 16 | 98 01 92 0c 00 00 13 09 |.fileID.|........|
|00001810| 09 09 7b 72 65 61 64 20 | 66 69 6c 65 20 6d 65 6e |..{read |file men|
|00001820| 75 7d 80 14 5c 07 6d 79 | 4d 65 6e 75 73 18 5c 05 |u}..\.my|Menus.\.|
|00001830| 65 64 69 74 4d 1c 0a 5c | 07 47 65 74 4d 65 6e 75 |editM..\|.GetMenu|
|00001840| 10 5c 06 65 64 69 74 49 | 44 16 98 01 92 0c 00 00 |.\.editI|D.......|
|00001850| 13 09 09 09 7b 72 65 61 | 64 20 65 64 69 74 20 6d |....{rea|d edit m|
|00001860| 65 6e 75 7d 94 01 8e 0a | 01 69 5a 03 00 01 0c 5c |enu}....|.iZ....\|
|00001870| 09 6d 65 6e 75 43 6f 75 | 6e 74 84 12 0a 49 6e 73 |.menuCou|nt...Ins|
|00001880| 65 72 74 4d 65 6e 75 10 | 5c 07 6d 79 4d 65 6e 75 |ertMenu.|\.myMenu|
|00001890| 73 18 5c 01 69 1c 12 08 | 5a 03 00 00 16 08 98 01 |s.\.i...|Z.......|
|000018a0| 92 11 00 00 1d 09 09 7b | 69 6e 73 74 61 6c 6c 20 |.......{|install |
|000018b0| 6d 65 6e 75 73 20 69 6e | 20 6d 65 6e 75 20 62 61 |menus in| menu ba|
|000018c0| 72 7d 7c 0d 00 00 00 00 | 0b 44 72 61 77 4d 65 6e |r}|.....|.DrawMen|
|000018d0| 75 42 61 72 00 00 00 00 | 00 00 00 00 98 01 92 0f |uBar....|........|
|000018e0| 00 00 19 09 09 09 09 09 | 09 7b 61 6e 64 20 64 72 |........|.{and dr|
|000018f0| 61 77 20 6d 65 6e 75 20 | 62 61 72 7d 9a 01 98 01 |aw menu |bar}....|
|00001900| 92 0e 00 00 17 09 09 09 | 09 09 09 09 09 09 09 09 |........|........|
|00001910| 7b 53 65 74 55 70 4d 65 | 6e 75 73 7d 92 22 00 01 |{SetUpMe|nus}."..|
|00001920| 3e 7b 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |>{======|========|
|00001930| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001940| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001950| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 7d 3d |========|======}=|
|00001960| 94 01 94 01 92 22 00 01 | 3e 7b 3d 3d 3d 3d 3d 3d |....."..|>{======|
|00001970| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001980| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001990| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000019a0| 3d 3d 3d 3d 3d 3d 7d 00 | b0 12 19 e8 00 00 00 00 |======}.|........|
|000019b0| 0a 4f 70 65 6e 57 69 6e | 64 6f 77 08 81 00 19 e8 |.OpenWin|dow.....|
|000019c0| 00 00 01 00 00 00 06 ba | 00 02 00 00 98 01 92 0c |........|........|
|000019d0| 00 01 13 7b 6f 70 65 6e | 20 61 20 6e 65 77 20 77 |...{open| a new w|
|000019e0| 69 6e 64 6f 77 7d 94 01 | 7e 03 00 00 1e 4e 84 14 |indow}..|~....N..|
|000019f0| 0b 4e 75 6d 54 6f 53 74 | 72 69 6e 67 10 5c 08 6e |.NumToSt|ring.\.n|
|00001a00| 65 78 74 57 4e 75 6d 12 | 5c 0a 6e 65 78 74 57 54 |extWNum.|\.nextWT|
|00001a10| 69 74 6c 65 16 08 98 01 | 92 11 00 00 1c 20 09 09 |itle....|..... ..|
|00001a20| 7b 70 72 65 70 61 72 65 | 20 6e 75 6d 62 65 72 20 |{prepare| number |
|00001a30| 6f 66 20 74 69 74 6c 65 | 7d 01 80 17 5c 0a 6e 65 |of title|}...\.ne|
|00001a40| 78 74 57 54 69 74 6c 65 | 0a 5c 06 63 6f 6e 63 61 |xtWTitle|.\.conca|
|00001a50| 74 10 5c 05 77 4e 61 6d | 65 12 5c 0a 6e 65 78 74 |t.\.wNam|e.\.next|
|00001a60| 57 54 69 74 6c 65 16 08 | 98 01 92 0c 00 00 12 20 |WTitle..|....... |
|00001a70| 20 09 7b 61 64 64 20 74 | 6f 20 70 72 65 66 69 78 | .{add t|o prefix|
|00001a80| 7d 6e 80 35 5c 08 6d 79 | 57 69 6e 64 6f 77 0a 5c |}n.5\.my|Window.\|
|00001a90| 09 4e 65 77 57 69 6e 64 | 6f 77 10 58 12 5c 09 6e |.NewWind|ow.X.\.n|
|00001aa0| 65 78 74 57 52 65 63 74 | 12 5c 0a 6e 65 78 74 57 |extWRect|.\.nextW|
|00001ab0| 54 69 74 6c 65 12 5c 04 | 54 72 75 65 12 5c 0d 6e |Title.\.|True.\.n|
|00001ac0| 6f 67 72 6f 77 44 6f 63 | 50 72 6f 63 12 5c 07 50 |ogrowDoc|Proc.\.P|
|00001ad0| 6f 69 6e 74 65 72 10 42 | 5a 03 00 01 16 12 5c 04 |ointer.B|Z.....\.|
|00001ae0| 54 72 75 65 12 08 5a 03 | 00 00 16 08 98 01 92 0c |True..Z.|........|
|00001af0| 00 00 13 09 09 7b 6f 70 | 65 6e 20 74 68 65 20 77 |.....{op|en the w|
|00001b00| 69 6e 64 6f 77 7d 84 0b | 07 53 65 74 50 6f 72 74 |indow}..|.SetPort|
|00001b10| 10 5c 08 6d 79 77 69 6e | 64 6f 77 16 98 01 92 14 |.\.mywin|dow.....|
|00001b20| 00 00 22 09 09 09 09 09 | 09 09 09 7b 6d 61 6b 65 |..".....|...{make|
|00001b30| 20 69 74 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 | it the |current |
|00001b40| 70 6f 72 74 7d 00 80 10 | 5c 06 74 78 52 65 63 74 |port}...|\.txRect|
|00001b50| 0a 5c 07 74 68 65 50 6f | 72 74 54 52 5c 08 70 6f |.\.thePo|rtTR\.po|
|00001b60| 72 74 52 65 63 74 98 01 | 92 14 00 00 23 09 09 7b |rtRect..|....#..{|
|00001b70| 70 72 65 70 61 72 65 20 | 54 45 52 65 63 6f 72 64 |prepare |TERecord|
|00001b80| 20 66 6f 72 20 6e 65 77 | 20 77 69 6e 64 6f 77 7d | for new| window}|
|00001b90| 84 11 09 49 6e 73 65 74 | 52 65 63 74 10 5c 06 74 |...Inset|Rect.\.t|
|00001ba0| 78 52 65 63 74 12 5a 03 | 00 04 12 08 5a 03 00 00 |xRect.Z.|....Z...|
|00001bb0| 16 08 98 01 80 12 5c 05 | 74 65 78 74 48 0a 5c 05 |......\.|textH.\.|
|00001bc0| 54 45 4e 65 77 10 5c 06 | 54 78 52 65 63 74 12 5c |TENew.\.|TxRect.\|
|00001bd0| 06 54 78 52 65 63 74 16 | 98 01 80 13 5c 09 6d 79 |.TxRect.|....\.my|
|00001be0| 57 69 6e 50 65 65 6b 0a | 5c 0a 57 69 6e 64 6f 77 |WinPeek.|\.Window|
|00001bf0| 50 65 65 6b 10 5c 08 6d | 79 57 69 6e 64 6f 77 16 |Peek.\.m|yWindow.|
|00001c00| 98 01 80 15 5c 09 6d 79 | 57 69 6e 50 65 65 6b 54 |....\.my|WinPeekT|
|00001c10| 52 5c 06 72 65 66 63 6f | 6e 0a 5c 07 4c 6f 6e 67 |R\.refco|n.\.Long|
|00001c20| 69 6e 74 10 5c 05 74 65 | 78 74 48 16 98 01 92 11 |int.\.te|xtH.....|
|00001c30| 00 00 1d 09 09 7b 6b 65 | 65 70 20 54 45 48 61 6e |.....{ke|ep TEHan|
|00001c40| 64 6c 65 20 69 6e 20 72 | 65 66 63 6f 6e 21 21 7d |dle in r|efcon!!}|
|00001c50| 84 16 0a 4f 66 66 73 65 | 74 52 65 63 74 10 5c 09 |...Offse|tRect.\.|
|00001c60| 6e 65 78 74 57 52 65 63 | 74 12 5c 06 77 69 6e 64 |nextWRec|t.\.wind|
|00001c70| 44 58 12 5c 06 77 69 6e | 64 44 59 16 98 01 92 12 |DX.\.win|dDY.....|
|00001c80| 00 00 1e 09 09 7b 6d 6f | 76 65 20 77 69 6e 64 6f |.....{mo|ve windo|
|00001c90| 77 20 64 6f 77 6e 20 61 | 6e 64 20 72 69 67 68 74 |w down a|nd right|
|00001ca0| 7d 00 94 01 86 14 5c 09 | 6e 65 78 74 57 52 65 63 |}.....\.|nextWRec|
|00001cb0| 74 52 5c 05 72 69 67 68 | 74 4a 5c 08 64 72 61 67 |tR\.righ|tJ\.drag|
|00001cc0| 52 65 63 74 52 5c 05 72 | 69 67 68 74 92 15 00 00 |RectR\.r|ight....|
|00001cd0| 25 20 09 09 09 09 7b 6d | 6f 76 65 20 62 61 63 6b |% ....{m|ove back|
|00001ce0| 20 69 66 20 69 74 27 73 | 20 74 6f 6f 20 66 61 72 | if it's| too far|
|00001cf0| 20 6f 76 65 72 7d 84 20 | 0a 4f 66 66 73 65 74 52 | over}. |.OffsetR|
|00001d00| 65 63 74 10 5c 09 6e 65 | 78 74 57 52 65 63 74 12 |ect.\.ne|xtWRect.|
|00001d10| 42 5c 09 6e 65 78 74 57 | 52 65 63 74 52 5c 04 6c |B\.nextW|RectR\.l|
|00001d20| 65 66 74 3a 5c 08 6c 65 | 66 74 45 64 67 65 12 08 |eft:\.le|ftEdge..|
|00001d30| 5a 03 00 00 16 08 98 01 | 86 15 5c 09 6e 65 78 74 |Z.......|..\.next|
|00001d40| 57 52 65 63 74 52 5c 06 | 62 6f 74 74 6f 6d 4a 5c |WRectR\.|bottomJ\|
|00001d50| 08 64 72 61 67 52 65 63 | 74 52 5c 06 62 6f 74 74 |.dragRec|tR\.bott|
|00001d60| 6f 6d 84 1e 0a 4f 66 66 | 73 65 74 52 65 63 74 10 |om...Off|setRect.|
|00001d70| 5c 09 6e 65 78 74 57 52 | 65 63 74 12 5a 03 00 00 |\.nextWR|ect.Z...|
|00001d80| 12 42 5c 09 6e 65 78 74 | 57 52 65 63 74 52 5c 03 |.B\.next|WRectR\.|
|00001d90| 74 6f 70 3a 5c 07 74 6f | 70 45 64 67 65 16 98 01 |top:\.to|pEdge...|
|00001da0| 80 0e 5c 08 6e 65 78 74 | 57 4e 75 6d 0a 5c 08 6e |..\.next|WNum.\.n|
|00001db0| 65 78 74 57 4e 75 6d 3a | 5a 03 00 01 98 01 92 13 |extWNum:|Z.......|
|00001dc0| 00 00 21 09 09 09 09 7b | 62 75 6d 70 20 6e 75 6d |..!....{|bump num|
|00001dd0| 62 65 72 20 66 6f 72 20 | 6e 65 78 74 20 77 69 6e |ber for |next win|
|00001de0| 64 6f 77 7d 80 0a 5c 07 | 6d 65 6e 75 73 4f 4b 0a |dow}..\.|menusOK.|
|00001df0| 5c 05 66 61 6c 73 65 08 | 98 01 84 14 0a 45 6e 61 |\.false.|.....Ena|
|00001e00| 62 6c 65 49 74 65 6d 10 | 5c 07 6d 79 4d 65 6e 75 |bleItem.|\.myMenu|
|00001e10| 73 18 5c 05 65 64 69 74 | 4d 1c 12 08 5a 03 00 00 |s.\.edit|M...Z...|
|00001e20| 16 08 98 01 92 14 00 00 | 23 09 09 7b 69 6e 20 63 |........|#..{in c|
|00001e30| 61 73 65 20 74 68 69 73 | 20 69 73 20 74 68 65 20 |ase this| is the |
|00001e40| 6f 6e 6c 79 20 77 69 6e | 64 6f 77 7d 9a 01 98 01 |only win|dow}....|
|00001e50| 92 0b 00 00 11 09 09 7b | 6f 66 20 4f 70 65 6e 57 |.......{|of OpenW|
|00001e60| 69 6e 64 6f 77 7d 92 22 | 00 01 3e 7b 3d 3d 3d 3d |indow}."|..>{====|
|00001e70| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001e80| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001e90| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001ea0| 3d 3d 3d 3d 3d 3d 3d 3d | 7d 3d 94 01 92 22 00 01 |========|}=..."..|
|00001eb0| 3e 7b 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |>{======|========|
|00001ec0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001ed0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001ee0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 7d 3d |========|======}=|
|00001ef0| b0 12 21 22 41 5c 00 00 | 0a 4b 69 6c 6c 57 69 6e |..!"A\..|.KillWin|
|00001f00| 64 6f 77 08 81 00 21 22 | 1f 26 01 00 1f 18 06 ba |dow...!"|.&......|
|00001f10| 00 03 00 04 a8 01 7c 0c | 1f 82 20 ba 09 74 68 65 |......|.|.. ..the|
|00001f20| 57 69 6e 64 6f 77 16 00 | 1f 32 00 00 00 08 a6 01 |Window..|.2......|
|00001f30| 7c 0c 40 00 47 5f 09 57 | 69 6e 64 6f 77 50 74 72 ||.@.G_.W|indowPtr|
|00001f40| 00 00 00 00 00 00 00 00 | aa 01 98 01 92 18 00 01 |........|........|
|00001f50| 2a 7b 63 6c 6f 73 65 20 | 61 20 77 69 6e 64 6f 77 |*{close |a window|
|00001f60| 20 61 6e 64 20 74 68 72 | 6f 77 20 65 76 65 72 79 | and thr|ow every|
|00001f70| 74 68 69 6e 67 20 61 77 | 61 79 7d 80 94 01 ba 01 |thing aw|ay}.....|
|00001f80| 7c 0c 00 00 1f ea 09 6d | 79 57 69 6e 50 65 65 6b ||......m|yWinPeek|
|00001f90| 12 00 1f 9c ff ec 1f 86 | a6 01 7c 0d 40 00 47 75 |........|..|.@.Gu|
|00001fa0| 0a 57 69 6e 64 6f 77 50 | 65 65 6b 08 00 00 00 00 |.WindowP|eek.....|
|00001fb0| 00 00 00 00 98 01 92 19 | 00 00 2c 09 7b 74 65 6d |........|..,.{tem|
|00001fc0| 70 20 76 61 72 69 61 62 | 6c 65 20 66 6f 72 20 75 |p variab|le for u|
|00001fd0| 73 61 67 65 20 66 6f 72 | 20 74 79 70 65 20 63 6f |sage for| type co|
|00001fe0| 65 72 63 69 6f 6e 7d ad | 7c 0d 00 00 20 54 0a 6d |ercion}.||... T.m|
|00001ff0| 79 57 69 6e 50 65 65 6b | 32 08 12 00 20 06 ff e8 |yWinPeek|2... ...|
|00002000| 1f ee a6 01 7c 0d 40 00 | 47 75 0a 57 69 6e 64 6f |....|.@.|Gu.Windo|
|00002010| 77 50 65 65 6b 08 00 00 | 00 00 00 00 00 00 98 01 |wPeek...|........|
|00002020| 92 19 00 00 2c 09 7b 74 | 65 6d 70 20 76 61 72 69 |....,.{t|emp vari|
|00002030| 61 62 6c 65 20 66 6f 72 | 20 75 73 61 67 65 20 66 |able for| usage f|
|00002040| 6f 72 20 74 79 70 65 20 | 63 6f 65 72 63 69 6f 6e |or type |coercion|
|00002050| 7d 00 7c 0c 00 00 00 00 | 09 74 68 65 52 65 66 63 |}.|.....|.theRefc|
|00002060| 6f 6e 12 00 20 6e ff e4 | 20 58 a6 01 7c 0b 40 00 |on.. n..| X..|.@.|
|00002070| 00 3f 07 6c 6f 6e 67 49 | 6e 74 00 00 00 00 00 00 |.?.longI|nt......|
|00002080| 00 00 98 01 92 1a 00 00 | 2e 09 09 09 7b 74 65 6d |........|....{tem|
|00002090| 70 20 76 61 72 69 61 62 | 6c 65 20 66 6f 72 20 75 |p variab|le for u|
|000020a0| 73 61 67 65 20 66 6f 72 | 20 74 79 70 65 20 63 6f |sage for| type co|
|000020b0| 65 72 63 69 6f 6e 7d 20 | 7c 0d 00 00 00 00 0a 74 |ercion} ||......t|
|000020c0| 68 65 57 69 6e 4b 69 6e | 64 08 12 00 20 d6 ff e2 |heWinKin|d... ...|
|000020d0| 20 be a6 01 7c 0b 40 00 | 00 2f 07 69 6e 74 65 67 | ...|.@.|./.integ|
|000020e0| 65 72 00 00 00 00 00 00 | 00 00 98 01 92 1a 00 00 |er......|........|
|000020f0| 2e 09 09 09 7b 74 65 6d | 70 20 76 61 72 69 61 62 |....{tem|p variab|
|00002100| 6c 65 20 66 6f 72 20 75 | 73 61 67 65 20 66 6f 72 |le for u|sage for|
|00002110| 20 74 79 70 65 20 63 6f | 65 72 63 69 6f 6e 7d 03 | type co|ercion}.|
|00002120| 94 01 7e 03 00 00 26 84 | 92 24 00 01 42 7b 54 48 |..~...&.|.$..B{TH|
|00002130| 45 53 45 20 53 54 41 54 | 45 4d 45 4e 54 53 20 41 |ESE STAT|EMENTS A|
|00002140| 52 45 20 4e 45 45 44 45 | 44 20 46 4f 52 20 43 4f |RE NEEDE|D FOR CO|
|00002150| 45 52 43 49 4f 4e 20 4c | 41 54 45 52 2c 20 4d 55 |ERCION L|ATER, MU|
|00002160| 53 54 20 42 45 20 48 45 | 52 45 20 54 4f 20 7d 58 |ST BE HE|RE TO }X|
|00002170| 92 21 00 01 3c 7b 41 56 | 4f 49 44 20 41 20 27 4e |.!..<{AV|OID A 'N|
|00002180| 49 4c 20 52 45 46 45 52 | 45 4e 43 45 27 20 45 52 |IL REFER|ENCE' ER|
|00002190| 52 4f 52 20 57 48 45 4e | 20 43 4c 4f 53 49 4e 47 |ROR WHEN| CLOSING|
|000021a0| 20 54 48 45 20 4c 41 53 | 54 20 57 49 4e 44 4f 57 | THE LAS|T WINDOW|
|000021b0| 7d 6f 80 15 5c 0a 6d 79 | 57 69 6e 50 65 65 6b 32 |}o..\.my|WinPeek2|
|000021c0| 0a 5c 0a 57 69 6e 64 6f | 77 50 65 65 6b 10 5c 0b |.\.Windo|wPeek.\.|
|000021d0| 46 72 6f 6e 74 57 69 6e | 64 6f 77 16 98 01 92 11 |FrontWin|dow.....|
|000021e0| 00 00 1d 09 7b 73 70 65 | 63 69 61 6c 20 63 6f 65 |....{spe|cial coe|
|000021f0| 72 63 69 6f 6e 20 6f 66 | 20 74 79 70 65 73 20 7d |rcion of| types }|
|00002200| 80 15 5c 0a 74 68 65 57 | 69 6e 4b 69 6e 64 0a 5c |..\.theW|inKind.\|
|00002210| 0a 6d 79 57 69 6e 50 65 | 65 6b 32 54 52 5c 0a 57 |.myWinPe|ek2TR\.W|
|00002220| 69 6e 64 6f 77 4b 69 6e | 64 08 98 01 92 12 00 00 |indowKin|d.......|
|00002230| 1e 09 09 7b 73 70 65 63 | 69 61 6c 20 63 6f 65 72 |...{spec|ial coer|
|00002240| 63 69 6f 6e 20 6f 66 20 | 74 79 70 65 73 20 7d 00 |cion of |types }.|
|00002250| 94 01 94 01 92 20 00 01 | 3a 7b 42 45 4c 4f 57 20 |..... ..|:{BELOW |
|00002260| 49 53 20 54 48 45 20 4f | 52 49 47 49 4e 41 4c 20 |IS THE O|RIGINAL |
|00002270| 53 54 41 54 45 4d 45 4e | 54 20 57 48 49 43 48 20 |STATEMEN|T WHICH |
|00002280| 4c 53 50 20 57 4f 55 4c | 44 4e 27 54 20 41 4c 4c |LSP WOUL|DN'T ALL|
|00002290| 4f 57 7d 92 92 2e 00 01 | 57 7b 54 45 44 69 73 70 |OW}.....|W{TEDisp|
|000022a0| 6f 73 65 20 28 20 54 45 | 48 61 6e 64 6c 65 20 28 |ose ( TE|Handle (|
|000022b0| 20 57 69 6e 64 6f 77 50 | 65 65 6b 20 28 20 74 68 | WindowP|eek ( th|
|000022c0| 65 57 69 6e 64 6f 77 20 | 29 20 5e 20 2e 20 72 65 |eWindow |) ^ . re|
|000022d0| 66 63 6f 6e 20 29 20 29 | 3b 09 09 7b 74 68 72 6f |fcon ) )|;..{thro|
|000022e0| 77 20 61 77 61 79 20 54 | 45 52 65 63 6f 72 64 7d |w away T|ERecord}|
|000022f0| 94 01 92 1f 00 01 39 7b | 54 48 45 53 45 20 41 52 |......9{|THESE AR|
|00002300| 45 20 54 48 45 20 46 49 | 58 45 44 20 53 54 41 54 |E THE FI|XED STAT|
|00002310| 45 4d 45 4e 54 53 2c 20 | 43 4f 45 52 43 45 44 20 |EMENTS, |COERCED |
|00002320| 49 4e 54 4f 20 41 43 43 | 45 50 54 41 4e 43 45 7d |INTO ACC|EPTANCE}|
|00002330| 80 14 5c 09 6d 79 57 69 | 6e 50 65 65 6b 0a 5c 0a |..\.myWi|nPeek.\.|
|00002340| 57 69 6e 64 6f 77 50 65 | 65 6b 10 5c 09 74 68 65 |WindowPe|ek.\.the|
|00002350| 57 69 6e 64 6f 77 16 08 | 98 01 92 12 00 00 1e 09 |Window..|........|
|00002360| 09 7b 73 70 65 63 69 61 | 6c 20 63 6f 65 72 63 69 |.{specia|l coerci|
|00002370| 6f 6e 20 6f 66 20 74 79 | 70 65 73 20 7d 00 80 12 |on of ty|pes }...|
|00002380| 5c 09 74 68 65 52 65 66 | 63 6f 6e 0a 5c 09 6d 79 |\.theRef|con.\.my|
|00002390| 57 69 6e 50 65 65 6b 54 | 52 5c 06 72 65 66 63 6f |WinPeekT|R\.refco|
|000023a0| 6e 08 98 01 92 13 00 00 | 20 09 09 09 09 7b 73 70 |n.......| ....{sp|
|000023b0| 65 63 69 61 6c 20 63 6f | 65 72 63 69 6f 6e 20 6f |ecial co|ercion o|
|000023c0| 66 20 74 79 70 65 73 20 | 7d 6f 84 13 09 54 45 44 |f types |}o...TED|
|000023d0| 69 73 70 6f 73 65 10 5c | 08 54 45 48 61 6e 64 6c |ispose.\|.TEHandl|
|000023e0| 65 10 5c 09 74 68 65 52 | 65 66 63 6f 6e 16 16 08 |e.\.theR|efcon...|
|000023f0| 98 01 92 0e 00 00 17 09 | 09 7b 74 68 72 6f 77 20 |........|.{throw |
|00002400| 61 77 61 79 20 54 45 52 | 65 63 6f 72 64 7d 94 01 |away TER|ecord}..|
|00002410| 84 0f 0d 44 69 73 70 6f | 73 65 57 69 6e 64 6f 77 |...Dispo|seWindow|
|00002420| 10 5c 09 74 68 65 57 69 | 6e 64 6f 77 16 08 98 01 |.\.theWi|ndow....|
|00002430| 92 11 00 00 1d 20 09 09 | 09 7b 74 68 72 6f 77 20 |..... ..|.{throw |
|00002440| 61 77 61 79 20 57 69 6e | 64 6f 77 52 65 63 6f 72 |away Win|dowRecor|
|00002450| 64 7d 80 06 5c 05 74 65 | 78 74 48 0a 58 08 98 01 |d}..\.te|xtH.X...|
|00002460| 92 16 00 00 27 09 09 09 | 09 09 09 09 09 7b 66 6f |....'...|.....{fo|
|00002470| 72 20 54 45 49 64 6c 65 | 20 69 6e 20 6d 61 69 6e |r TEIdle| in main|
|00002480| 20 65 76 65 6e 74 20 6c | 6f 6f 70 7d 86 09 5c 0b | event l|oop}..\.|
|00002490| 46 72 6f 6e 74 57 69 6e | 64 6f 77 44 58 08 92 15 |FrontWin|dowDX...|
|000024a0| 00 00 24 09 09 7b 69 66 | 20 6e 6f 20 6d 6f 72 65 |..$..{if| no more|
|000024b0| 20 77 69 6e 64 6f 77 73 | 20 64 69 73 61 62 6c 65 | windows| disable|
|000024c0| 20 43 4c 4f 53 45 7d 6f | 84 17 0b 44 69 73 61 62 | CLOSE}o|...Disab|
|000024d0| 6c 65 49 74 65 6d 10 5c | 07 6d 79 4d 65 6e 75 73 |leItem.\|.myMenus|
|000024e0| 18 5c 05 66 69 6c 65 4d | 1c 12 5c 09 63 6c 6f 73 |.\.fileM|..\.clos|
|000024f0| 65 49 74 65 6d 16 98 01 | 94 01 92 20 00 01 3a 7b |eItem...|... ..:{|
|00002500| 42 45 4c 4f 57 20 49 53 | 20 54 48 45 20 4f 52 49 |BELOW IS| THE ORI|
|00002510| 47 49 4e 41 4c 20 53 54 | 41 54 45 4d 45 4e 54 20 |GINAL ST|ATEMENT |
|00002520| 57 48 49 43 48 20 4c 53 | 50 20 57 4f 55 4c 44 4e |WHICH LS|P WOULDN|
|00002530| 27 54 20 41 4c 4c 4f 57 | 7d 20 92 33 00 01 60 7b |'T ALLOW|} .3..`{|
|00002540| 69 66 20 57 69 6e 64 6f | 77 50 65 65 6b 20 28 20 |if Windo|wPeek ( |
|00002550| 46 72 6f 6e 74 57 69 6e | 64 6f 77 20 29 20 5e 20 |FrontWin|dow ) ^ |
|00002560| 2e 20 77 69 6e 64 6f 77 | 4b 69 6e 64 20 3c 20 30 |. window|Kind < 0|
|00002570| 20 74 68 65 6e 09 7b 69 | 66 20 61 20 64 65 73 6b | then.{i|f a desk|
|00002580| 20 61 63 63 20 69 73 20 | 63 6f 6d 69 6e 67 20 75 | acc is |coming u|
|00002590| 70 2c 20 65 6e 61 62 6c | 65 20 75 6e 64 6f 7d 02 |p, enabl|e undo}.|
|000025a0| 94 01 92 1e 00 01 36 7b | 54 48 49 53 20 49 53 20 |......6{|THIS IS |
|000025b0| 54 48 45 20 46 49 58 45 | 44 20 53 54 41 54 45 4d |THE FIXE|D STATEM|
|000025c0| 45 4e 54 2c 20 43 4f 45 | 52 43 45 44 20 49 4e 54 |ENT, COE|RCED INT|
|000025d0| 4f 20 41 43 43 45 50 54 | 41 4e 43 45 7d 2a 86 0a |O ACCEPT|ANCE}*..|
|000025e0| 5c 0a 74 68 65 57 69 6e | 4b 69 6e 64 48 08 5a 03 |\.theWin|KindH.Z.|
|000025f0| 00 00 92 18 00 00 2b 20 | 09 7b 69 66 20 61 20 64 |......+ |.{if a d|
|00002600| 65 73 6b 20 61 63 63 20 | 69 73 20 63 6f 6d 69 6e |esk acc |is comin|
|00002610| 67 20 75 70 2c 20 65 6e | 61 62 6c 65 20 75 6e 64 |g up, en|able und|
|00002620| 6f 7d 94 01 84 16 0a 45 | 6e 61 62 6c 65 49 74 65 |o}.....E|nableIte|
|00002630| 6d 10 5c 07 6d 79 4d 65 | 6e 75 73 18 5c 05 65 64 |m.\.myMe|nus.\.ed|
|00002640| 69 74 4d 1c 12 5c 08 75 | 6e 64 6f 49 74 65 6d 16 |itM..\.u|ndoItem.|
|00002650| 96 01 84 17 0b 44 69 73 | 61 62 6c 65 49 74 65 6d |.....Dis|ableItem|
|00002660| 10 5c 07 6d 79 4d 65 6e | 75 73 18 5c 05 65 64 69 |.\.myMen|us.\.edi|
|00002670| 74 4d 1c 12 5c 08 75 6e | 64 6f 49 74 65 6d 16 08 |tM..\.un|doItem..|
|00002680| 98 01 9a 01 98 01 92 0a | 00 00 0e 09 09 7b 4b 69 |........|.....{Ki|
|00002690| 6c 6c 57 69 6e 64 6f 77 | 7d ec 92 22 00 01 3e 7b |llWindow|}.."..>{|
|000026a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000026b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000026c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000026d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 7d da 94 01 |========|====}...|
|000026e0| 92 22 00 01 3e 7b 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |."..>{==|========|
|000026f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002700| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002710| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002720| 3d 3d 7d 6a b2 14 28 cc | 00 00 00 00 08 4d 79 46 |==}j..(.|.....MyF|
|00002730| 69 6c 74 65 72 08 80 00 | 28 cc 27 5e 01 00 27 50 |ilter...|(.'^..'P|
|00002740| 06 ba 00 04 00 0c 27 f0 | 00 14 00 01 a8 01 7c 0c |......'.|......|.|
|00002750| 27 be 27 86 09 74 68 65 | 44 69 61 6c 6f 67 16 00 |'.'..the|Dialog..|
|00002760| 27 6a 27 94 00 10 a6 01 | 7c 0c 40 00 4e 8f 09 44 |'j'.....||.@.N..D|
|00002770| 69 61 6c 6f 67 50 74 72 | 00 00 00 00 00 00 00 00 |ialogPtr|........|
|00002780| 98 01 ba 01 7c 0c 00 00 | 28 0c 08 74 68 65 45 76 |....|...|(..theEv|
|00002790| 65 6e 74 08 17 00 27 a0 | 27 ca 00 0c a6 01 7c 0d |ent...'.|'.....|.|
|000027a0| 40 00 20 6d 0b 45 76 65 | 6e 74 52 65 63 6f 72 64 |@. m.Eve|ntRecord|
|000027b0| 00 00 00 00 00 00 00 00 | 98 01 ba 01 7c 0b 28 9a |........|....|.(.|
|000027c0| 28 6c 07 69 74 65 6d 48 | 69 74 17 00 27 d6 00 00 |(l.itemH|it..'...|
|000027d0| 00 08 a6 01 7c 0b 40 00 | 00 2f 07 49 6e 74 65 67 |....|.@.|./.Integ|
|000027e0| 65 72 00 00 00 00 00 00 | 00 00 aa 01 a6 01 7c 0b |er......|......|.|
|000027f0| 40 00 00 11 07 42 6f 6f | 6c 65 61 6e 00 00 00 00 |@....Boo|lean....|
|00002800| 00 00 00 00 98 01 94 01 | ba 01 7c 0b 28 3c 00 00 |........|..|.(<..|
|00002810| 07 74 68 65 54 79 70 65 | 12 00 28 24 ff ee 28 10 |.theType|..($..(.|
|00002820| a6 01 7c 0b 40 00 00 2f | 07 69 6e 74 65 67 65 72 |..|.@../|.integer|
|00002830| 00 00 00 00 00 00 00 00 | 98 01 7c 0b 00 00 00 00 |........|..|.....|
|00002840| 07 74 68 65 49 74 65 6d | 12 00 28 54 ff ea 28 40 |.theItem|..(T..(@|
|00002850| a6 01 7c 0b 40 00 04 e9 | 06 68 61 6e 64 6c 65 08 |..|.@...|.handle.|
|00002860| 00 00 00 00 00 00 00 00 | 98 01 7c 0b 00 00 00 00 |........|..|.....|
|00002870| 06 74 68 65 42 6f 78 08 | 12 00 28 84 ff e2 28 70 |.theBox.|..(...(p|
|00002880| a6 01 7c 0a 40 00 0b 39 | 04 52 65 63 74 08 00 00 |..|.@..9|.Rect...|
|00002890| 00 00 00 00 00 00 98 01 | 7c 0d 00 00 00 00 0a 66 |........||......f|
|000028a0| 69 6e 61 6c 54 69 63 6b | 73 08 12 00 28 b6 ff de |inalTick|s...(...|
|000028b0| 28 9e a6 01 7c 0b 40 00 | 00 3f 07 4c 6f 6e 67 69 |(...|.@.|.?.Longi|
|000028c0| 6e 74 00 00 00 00 00 00 | 00 00 98 01 7e 03 00 00 |nt......|....~...|
|000028d0| 2a 8a 86 37 20 5c 06 42 | 69 74 41 6e 64 10 5c 08 |*..7 \.B|itAnd.\.|
|000028e0| 74 68 65 45 76 65 6e 74 | 52 5c 07 6d 65 73 73 61 |theEvent|R\.messa|
|000028f0| 67 65 12 5c 0c 63 68 61 | 72 43 6f 64 65 4d 61 73 |ge.\.cha|rCodeMas|
|00002900| 6b 16 44 08 5a 03 00 0d | 22 3e 20 5c 06 42 49 74 |k.D.Z...|"> \.BIt|
|00002910| 41 6e 64 10 5c 08 74 68 | 65 45 76 65 6e 74 52 5c |And.\.th|eEventR\|
|00002920| 07 6d 65 73 73 61 67 65 | 12 5c 0c 63 68 61 72 43 |.message|.\.charC|
|00002930| 6f 64 65 4d 61 73 6b 16 | 44 08 5a 03 00 03 22 08 |odeMask.|D.Z...".|
|00002940| 92 10 00 01 1b 20 7b 63 | 61 72 72 69 61 67 65 20 |..... {c|arriage |
|00002950| 72 65 74 75 72 6e 20 6f | 72 20 65 6e 74 65 72 7d |return o|r enter}|
|00002960| 7e 03 00 00 2a 70 84 1d | 08 47 65 74 44 49 74 65 |~...*p..|.GetDIte|
|00002970| 6d 10 5c 09 74 68 65 44 | 69 61 6c 6f 67 12 5a 03 |m.\.theD|ialog.Z.|
|00002980| 00 01 12 5c 07 74 68 65 | 54 79 70 65 12 5c 07 74 |...\.the|Type.\.t|
|00002990| 68 65 49 74 65 6d 12 5c | 06 74 68 65 42 6f 78 16 |heItem.\|.theBox.|
|000029a0| 98 01 84 19 0d 48 69 6c | 69 74 65 43 6f 6e 74 72 |.....Hil|iteContr|
|000029b0| 6f 6c 10 5c 0d 43 6f 6e | 74 72 6f 6c 48 61 6e 64 |ol.\.Con|trolHand|
|000029c0| 6c 65 10 5c 07 74 68 65 | 49 74 65 6d 16 12 5a 03 |le.\.the|Item..Z.|
|000029d0| 00 01 16 08 98 01 84 0e | 05 44 65 6c 61 79 10 08 |........|.Delay..|
|000029e0| 5a 03 00 08 12 5c 0a 66 | 69 6e 61 6c 54 69 63 6b |Z....\.f|inalTick|
|000029f0| 73 16 98 01 84 19 0d 48 | 69 6c 69 74 65 43 6f 6e |s......H|iliteCon|
|00002a00| 74 72 6f 6c 10 5c 0d 43 | 6f 6e 74 72 6f 6c 48 61 |trol.\.C|ontrolHa|
|00002a10| 6e 64 6c 65 10 5c 07 74 | 68 65 49 74 65 6d 16 12 |ndle.\.t|heItem..|
|00002a20| 5a 03 00 00 16 08 98 01 | 80 08 5c 07 69 74 65 6d |Z.......|..\.item|
|00002a30| 48 69 74 0a 5a 03 00 01 | 98 01 80 0a 5c 08 4d 79 |Hit.Z...|....\.My|
|00002a40| 46 69 6c 74 65 72 0a 5c | 04 54 72 75 65 08 98 01 |Filter.\|.True...|
|00002a50| 9a 01 92 0f 00 00 18 20 | 7b 69 66 20 42 69 74 41 |....... |{if BitA|
|00002a60| 6e 64 2e 2e 2e 74 68 65 | 20 62 65 67 69 6e 7d 00 |nd...the| begin}.|
|00002a70| 96 01 80 0a 5c 08 4d 79 | 46 69 6c 74 65 72 0a 5c |....\.My|Filter.\|
|00002a80| 05 46 61 6c 73 65 98 01 | 9a 01 98 01 92 0d 00 00 |.False..|........|
|00002a90| 15 09 09 7b 66 75 6e 63 | 74 69 6f 6e 20 4d 79 46 |...{func|tion MyF|
|00002aa0| 69 6c 74 65 72 7d 94 01 | 92 22 00 01 3e 7b 3d 3d |ilter}..|."..>{==|
|00002ab0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002ac0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002ad0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002ae0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 7d 3d 94 01 92 22 |========|==}=..."|
|00002af0| 00 01 3e 7b 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..>{====|========|
|00002b00| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002b10| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002b20| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002b30| 7d 06 b0 12 2b 8e 00 00 | 30 b8 0a 44 6f 41 62 6f |}...+...|0..DoAbo|
|00002b40| 75 74 42 6f 78 08 81 00 | 2b 8e 00 00 01 00 2b 5e |utBox...|+.....+^|
|00002b50| 06 ba 00 05 00 00 98 01 | 94 01 ba 01 7c 0b 00 00 |........|....|...|
|00002b60| 00 00 07 69 74 65 6d 48 | 69 74 12 00 2b 76 ff ee |...itemH|it..+v..|
|00002b70| 2b 62 a6 01 7c 0b 40 00 | 00 2f 07 49 6e 74 65 67 |+b..|.@.|./.Integ|
|00002b80| 65 72 00 00 00 00 00 00 | 00 00 98 01 94 01 7e 03 |er......|......~.|
|00002b90| 00 00 2c 26 80 1f 5c 08 | 6d 79 57 69 6e 64 6f 77 |..,&..\.|myWindow|
|00002ba0| 0a 5c 0c 47 65 74 4e 65 | 77 44 69 61 6c 6f 67 10 |.\.GetNe|wDialog.|
|00002bb0| 5a 03 03 e8 12 26 5c 08 | 4d 79 46 69 6c 74 65 72 |Z....&\.|MyFilter|
|00002bc0| 12 5c 07 70 6f 69 6e 74 | 65 72 10 42 5a 03 00 01 |.\.point|er.BZ...|
|00002bd0| 16 16 98 01 8c 02 2c 04 | 84 0e 0b 4d 6f 64 61 6c |......,.|...Modal|
|00002be0| 44 69 61 6c 6f 67 10 58 | 12 5c 07 69 74 65 6d 68 |Dialog.X|.\.itemh|
|00002bf0| 69 74 16 08 74 08 5c 07 | 69 74 65 6d 48 69 74 44 |it..t.\.|itemHitD|
|00002c00| 5a 03 00 01 98 01 84 0e | 0c 44 69 73 70 6f 73 44 |Z.......|.DisposD|
|00002c10| 69 61 6c 6f 67 10 5c 08 | 6d 79 57 69 6e 64 6f 77 |ialog.\.|myWindow|
|00002c20| 16 08 98 01 9a 01 98 01 | 92 0f 00 00 19 09 09 7b |........|.......{|
|00002c30| 70 72 6f 63 65 64 75 72 | 65 20 44 6f 41 62 6f 75 |procedur|e DoAbou|
|00002c40| 74 42 6f 78 29 7d 94 01 | 92 22 00 01 3e 7b 3d 3d |tBox)}..|."..>{==|
|00002c50| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002c60| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002c70| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002c80| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 7d ee 94 01 92 22 |========|==}...."|
|00002c90| 00 01 3e 7b 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..>{====|========|
|00002ca0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002cb0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002cc0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002cd0| 7d cc 92 26 00 01 47 7b | 4d 55 43 48 20 53 49 4d |}..&..G{|MUCH SIM|
|00002ce0| 50 4c 49 46 49 45 44 20 | 56 45 52 53 49 4f 4e 20 |PLIFIED |VERSION |
|00002cf0| 4f 46 20 4f 52 49 47 49 | 4e 41 4c 20 27 41 62 6f |OF ORIGI|NAL 'Abo|
|00002d00| 75 74 20 53 68 6f 77 4f | 66 66 27 20 41 50 50 4c |ut ShowO|ff' APPL|
|00002d10| 45 20 4d 45 4e 55 20 49 | 54 45 4d 2c 20 7d 92 24 |E MENU I|TEM, }.$|
|00002d20| 00 01 43 7b 54 48 4f 55 | 47 48 20 59 4f 55 20 57 |..C{THOU|GH YOU W|
|00002d30| 4f 4e 27 54 20 47 45 54 | 20 54 48 45 20 43 48 41 |ON'T GET| THE CHA|
|00002d40| 4e 43 45 20 54 4f 20 46 | 49 58 20 54 48 45 20 27 |NCE TO F|IX THE '|
|00002d50| 53 45 43 52 45 54 27 20 | 42 55 47 20 44 45 53 43 |SECRET' |BUG DESC|
|00002d60| 52 49 42 45 44 7d 92 26 | 00 01 47 7b 49 4e 20 41 |RIBED}.&|..G{IN A|
|00002d70| 53 43 49 49 20 4c 45 54 | 54 45 52 49 4e 47 20 4f |SCII LET|TERING O|
|00002d80| 4e 20 50 41 47 45 20 32 | 36 34 20 4f 46 20 27 48 |N PAGE 2|64 OF 'H|
|00002d90| 6f 77 20 54 6f 20 57 72 | 69 74 65 20 4d 61 63 69 |ow To Wr|ite Maci|
|00002da0| 6e 74 6f 73 68 20 53 6f | 66 74 77 61 72 65 2e 27 |ntosh So|ftware.'|
|00002db0| 20 7d 94 01 92 28 00 01 | 4b 7b 49 46 20 54 48 49 | }...(..|K{IF THI|
|00002dc0| 53 20 53 45 43 52 45 54 | 20 42 55 47 20 49 53 20 |S SECRET| BUG IS |
|00002dd0| 4f 46 20 49 4e 54 45 52 | 45 53 54 20 54 4f 20 59 |OF INTER|EST TO Y|
|00002de0| 4f 55 2c 20 44 45 42 55 | 47 20 54 48 45 20 4f 52 |OU, DEBU|G THE OR|
|00002df0| 49 47 49 4e 41 4c 20 43 | 4f 44 45 2c 20 41 42 4f |IGINAL C|ODE, ABO|
|00002e00| 56 45 2c 7d 92 26 00 01 | 46 7b 46 4f 52 20 54 48 |VE,}.&..|F{FOR TH|
|00002e10| 45 20 20 27 66 75 6e 63 | 74 69 6f 6e 20 4d 79 46 |E  'func|tion MyF|
|00002e20| 69 6c 74 65 72 27 20 41 | 4e 44 20 27 70 72 6f 63 |ilter' A|ND 'proc|
|00002e30| 65 64 75 72 65 20 44 6f | 41 62 6f 75 74 42 6f 78 |edure Do|AboutBox|
|00002e40| 27 20 41 4e 44 20 50 55 | 54 20 54 48 45 20 7d 67 |' AND PU|T THE }g|
|00002e50| 92 25 00 01 44 7b 4f 52 | 49 47 49 4e 41 4c 20 43 |.%..D{OR|IGINAL C|
|00002e60| 4f 4d 4d 41 4e 44 20 27 | 44 6f 41 62 6f 75 74 42 |OMMAND '|DoAboutB|
|00002e70| 6f 78 27 20 42 41 43 4b | 20 49 4e 20 54 48 45 20 |ox' BACK| IN THE |
|00002e80| 27 70 72 6f 63 65 64 75 | 72 65 20 44 6f 43 6f 6d |'procedu|re DoCom|
|00002e90| 6d 61 6e 64 27 20 49 4e | 7d 1f 92 27 00 01 48 7b |mand' IN|}..'..H{|
|00002ea0| 54 48 45 20 27 63 61 73 | 65 20 6f 66 20 61 70 70 |THE 'cas|e of app|
|00002eb0| 6c 65 49 44 27 20 53 45 | 43 54 49 4f 4e 20 4f 46 |leID' SE|CTION OF|
|00002ec0| 20 54 48 45 20 27 44 6f | 43 6f 6d 6d 61 6e 64 27 | THE 'Do|Command'|
|00002ed0| 20 52 4f 55 54 49 4e 45 | 20 54 4f 20 4d 41 4b 45 | ROUTINE| TO MAKE|
|00002ee0| 20 54 48 45 20 20 7d ad | 92 13 00 01 21 7b 4f 52 | THE  }.|....!{OR|
|00002ef0| 49 47 49 4e 41 4c 20 43 | 41 4c 4c 20 54 4f 20 27 |IGINAL C|ALL TO '|
|00002f00| 44 6f 41 62 6f 75 74 42 | 6f 78 27 2e 20 7d 94 01 |DoAboutB|ox'. }..|
|00002f10| 92 27 00 01 49 7b 57 49 | 54 48 20 54 48 45 20 42 |.'..I{WI|TH THE B|
|00002f20| 4f 4f 4b 20 46 4f 52 4d | 41 54 20 54 48 45 20 27 |OOK FORM|AT THE '|
|00002f30| 41 62 6f 75 74 20 53 68 | 6f 77 4f 66 66 27 20 46 |About Sh|owOff' F|
|00002f40| 45 41 54 55 52 45 20 43 | 41 55 53 45 44 20 41 20 |EATURE C|AUSED A |
|00002f50| 42 41 44 20 43 52 41 53 | 48 20 41 4e 44 7d 92 2b |BAD CRAS|H AND}.+|
|00002f60| 00 01 50 7b 42 55 52 4e | 2c 20 49 20 54 48 49 4e |..P{BURN|, I THIN|
|00002f70| 4b 20 49 54 20 4e 45 45 | 44 45 44 20 41 20 52 45 |K IT NEE|DED A RE|
|00002f80| 53 4f 55 52 43 45 20 4f | 46 20 49 44 3d 31 30 30 |SOURCE O|F ID=100|
|00002f90| 30 20 54 4f 20 42 45 20 | 43 52 45 41 54 45 44 20 |0 TO BE |CREATED |
|00002fa0| 49 4e 20 41 20 46 4f 52 | 4d 41 54 20 4f 54 48 45 |IN A FOR|MAT OTHE|
|00002fb0| 52 20 7d 07 92 28 00 01 | 4a 7b 54 48 41 4e 20 54 |R }..(..|J{THAN T|
|00002fc0| 48 45 20 57 41 59 20 49 | 20 48 41 56 45 20 43 52 |HE WAY I| HAVE CR|
|00002fd0| 45 41 54 45 44 20 54 48 | 45 20 27 41 4c 52 54 27 |EATED TH|E 'ALRT'|
|00002fe0| 20 52 45 53 4f 55 52 43 | 45 2e 20 20 53 49 4e 43 | RESOURC|E.  SINC|
|00002ff0| 45 20 54 48 45 20 43 4f | 44 45 20 44 49 44 4e 27 |E THE CO|DE DIDN'|
|00003000| 54 20 7d df 92 27 00 01 | 48 7b 57 4f 52 4b 20 27 |T }..'..|H{WORK '|
|00003010| 41 53 20 57 45 4c 4c 27 | 20 41 53 20 57 41 53 20 |AS WELL'| AS WAS |
|00003020| 49 4e 44 49 43 41 54 45 | 44 20 49 4e 20 54 48 45 |INDICATE|D IN THE|
|00003030| 20 42 4f 4f 4b 20 49 54 | 20 57 41 53 20 42 45 54 | BOOK IT| WAS BET|
|00003040| 54 45 52 20 54 4f 20 44 | 55 50 4c 49 43 41 54 45 |TER TO D|UPLICATE|
|00003050| 7d 2e 92 25 00 01 45 7b | 54 48 45 20 4e 45 45 44 |}..%..E{|THE NEED|
|00003060| 45 44 20 46 55 4e 43 54 | 49 4f 4e 2c 20 57 49 54 |ED FUNCT|ION, WIT|
|00003070| 48 4f 55 54 20 41 4c 4c | 20 54 48 45 20 43 4f 44 |HOUT ALL| THE COD|
|00003080| 45 20 4c 49 4e 45 53 20 | 41 4e 44 20 44 45 42 55 |E LINES |AND DEBU|
|00003090| 47 47 49 4e 47 20 54 49 | 4d 45 2e 7d 92 0b 00 01 |GGING TI|ME.}....|
|000030a0| 11 7b 53 74 65 76 65 20 | 53 63 61 6e 64 61 6c 69 |.{Steve |Scandali|
|000030b0| 73 7d 94 01 b0 12 31 c0 | 00 00 32 a8 0b 44 6f 41 |s}....1.|..2..DoA|
|000030c0| 70 70 6c 65 4d 65 6e 75 | 81 00 31 c0 00 00 01 00 |ppleMenu|..1.....|
|000030d0| 31 8e 06 ba 00 06 00 00 | 98 01 92 2d 00 01 55 7b |1.......|...-..U{|
|000030e0| 47 65 74 20 74 68 65 20 | 27 41 62 6f 75 74 20 53 |Get the |'About S|
|000030f0| 68 6f 77 4f 66 66 2e 2e | 2e 27 20 41 4c 52 54 2c |howOff..|.' ALRT,|
|00003100| 20 61 6e 64 20 77 61 69 | 74 20 75 6e 74 69 6c 20 | and wai|t until |
|00003110| 74 68 65 20 75 73 65 72 | 20 63 6c 69 63 6b 73 20 |the user| clicks |
|00003120| 69 6e 20 74 68 65 20 27 | 4f 4b 27 20 62 75 74 74 |in the '|OK' butt|
|00003130| 6f 6e 2e 7d 92 2b 00 01 | 50 7b 54 68 65 20 41 4c |on.}.+..|P{The AL|
|00003140| 52 54 20 69 73 20 64 65 | 66 69 6e 65 64 20 69 6e |RT is de|fined in|
|00003150| 20 74 68 65 20 6c 69 6e | 6b 65 64 20 52 45 53 4f | the lin|ked RESO|
|00003160| 55 52 43 45 20 66 69 6c | 65 20 73 70 65 63 69 66 |URCE fil|e specif|
|00003170| 69 65 64 20 69 6e 20 74 | 68 65 20 50 52 4f 4a 45 |ied in t|he PROJE|
|00003180| 43 54 20 66 69 6c 65 2e | 7d 00 ba 01 7c 0c 00 00 |CT file.|}...|...|
|00003190| 00 00 09 6f 70 65 6e 41 | 6c 65 72 74 12 00 31 a8 |...openA|lert..1.|
|000031a0| ff ee 31 92 a6 01 7c 0b | 40 00 00 2f 07 69 6e 74 |..1...|.|@../.int|
|000031b0| 65 67 65 72 00 00 00 00 | 00 00 00 00 98 01 94 01 |eger....|........|
|000031c0| 7e 03 32 a4 32 18 80 11 | 5c 09 6f 70 65 6e 41 6c |~.2.2...|\.openAl|
|000031d0| 65 72 74 0a 5c 05 41 6c | 65 72 74 10 5c 07 41 62 |ert.\.Al|ert.\.Ab|
|000031e0| 6f 75 74 49 44 12 58 16 | 92 17 00 00 29 09 09 7b |outID.X.|....)..{|
|000031f0| 46 55 4e 43 54 49 4f 4e | 20 77 69 6c 6c 20 65 78 |FUNCTION| will ex|
|00003200| 65 63 75 74 65 64 20 75 | 6e 74 69 6c 20 27 4f 4b |ecuted u|ntil 'OK|
|00003210| 27 20 68 69 74 7d 9a 01 | 98 01 92 22 00 01 3e 7b |' hit}..|..."..>{|
|00003220| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003230| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003240| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003250| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 7d 75 94 01 |========|====}u..|
|00003260| 92 22 00 01 3e 7b 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |."..>{==|========|
|00003270| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003280| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003290| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000032a0| 3d 3d 7d 20 b0 11 35 54 | 00 00 00 00 09 44 6f 43 |==} ..5T|.....DoC|
|000032b0| 6f 6d 6d 61 6e 64 81 00 | 35 54 32 d6 01 00 32 ca |ommand..|5T2...2.|
|000032c0| 06 ba 00 07 00 04 a8 01 | 7c 0b 00 00 33 42 07 6d |........||...3B.m|
|000032d0| 52 65 73 75 6c 74 16 00 | 32 e2 00 00 00 08 a6 01 |Result..|2.......|
|000032e0| 7c 0b 40 00 00 3f 07 6c | 6f 6e 67 49 6e 74 00 00 ||.@..?.l|ongInt..|
|000032f0| 00 00 00 00 00 00 aa 01 | 98 01 92 21 00 01 3d 7b |........|...!..={|
|00003300| 45 78 65 63 75 74 65 20 | 69 74 65 6d 20 73 70 65 |Execute |item spe|
|00003310| 63 69 66 69 65 64 20 62 | 79 20 4d 52 65 73 75 6c |cified b|y MResul|
|00003320| 74 2c 20 74 68 65 20 72 | 65 73 75 6c 74 20 6f 66 |t, the r|esult of|
|00003330| 20 4d 65 6e 75 53 65 6c | 65 63 74 7d 94 01 ba 01 | MenuSel|ect}....|
|00003340| 7c 0b 34 06 33 a6 07 74 | 68 65 49 74 65 6d 12 00 ||.4.3..t|heItem..|
|00003350| 33 5a ff ee 33 46 a6 01 | 7c 0b 40 00 00 2f 07 69 |3Z..3F..||.@../.i|
|00003360| 6e 74 65 67 65 72 00 00 | 00 00 00 00 00 00 98 01 |nteger..|........|
|00003370| 92 1a 00 00 2f 09 09 7b | 6d 65 6e 75 20 69 74 65 |..../..{|menu ite|
|00003380| 6d 20 6e 75 6d 62 65 72 | 20 66 6f 72 20 6d 52 65 |m number| for mRe|
|00003390| 73 75 6c 74 20 6c 6f 77 | 2d 6f 72 64 65 72 20 77 |sult low|-order w|
|000033a0| 6f 72 64 7d 7c 0b 00 00 | 34 ea 07 74 68 65 4d 65 |ord}|...|4..theMe|
|000033b0| 6e 75 12 00 33 be ff ec | 33 aa a6 01 7c 0b 40 00 |nu..3...|3...|.@.|
|000033c0| 00 2f 07 69 6e 74 65 67 | 65 72 00 00 00 00 00 00 |./.integ|er......|
|000033d0| 00 00 98 01 92 18 00 00 | 2b 09 09 7b 6d 65 6e 75 |........|+..{menu|
|000033e0| 20 6e 75 6d 62 65 72 20 | 66 6f 72 20 6d 52 65 73 | number |for mRes|
|000033f0| 75 6c 74 20 68 69 67 68 | 2d 6f 72 64 65 72 20 77 |ult high|-order w|
|00003400| 6f 72 64 7d 7c 0a 34 82 | 34 52 04 6e 61 6d 65 08 |ord}|.4.|4R.name.|
|00003410| 12 00 34 1c fe ec 34 0a | a6 01 7c 0b 40 00 05 1d |..4...4.|..|.@...|
|00003420| 06 53 74 72 32 35 35 08 | 00 00 00 00 00 00 00 00 |.Str255.|........|
|00003430| 98 01 92 0f 00 00 18 09 | 09 09 7b 64 65 73 6b 20 |........|..{desk |
|00003440| 61 63 63 65 73 73 6f 72 | 79 20 6e 61 6d 65 7d 06 |accessor|y name}.|
|00003450| 7c 0a 00 00 00 00 04 74 | 65 6d 70 08 12 00 34 68 ||......t|emp...4h|
|00003460| fe ea 34 56 a6 01 7c 0b | 40 00 00 2f 07 69 6e 74 |..4V..|.|@../.int|
|00003470| 65 67 65 72 00 00 00 00 | 00 00 00 00 98 01 94 01 |eger....|........|
|00003480| 7c 0c 00 00 00 00 09 6d | 79 57 69 6e 50 65 65 6b ||......m|yWinPeek|
|00003490| 12 00 34 9c fe e6 34 86 | a6 01 7c 0d 40 00 47 75 |..4...4.|..|.@.Gu|
|000034a0| 0a 57 69 6e 64 6f 77 50 | 65 65 6b 08 00 00 00 00 |.WindowP|eek.....|
|000034b0| 00 00 00 00 98 01 92 19 | 00 00 2c 09 7b 74 65 6d |........|..,.{tem|
|000034c0| 70 20 76 61 72 69 61 62 | 6c 65 20 66 6f 72 20 75 |p variab|le for u|
|000034d0| 73 61 67 65 20 66 6f 72 | 20 74 79 70 65 20 63 6f |sage for| type co|
|000034e0| 65 72 63 69 6f 6e 7d 45 | 7c 0d 00 00 00 00 0a 74 |ercion}E||......t|
|000034f0| 68 65 57 69 6e 4b 69 6e | 64 08 12 00 35 06 fe e4 |heWinKin|d...5...|
|00003500| 34 ee a6 01 7c 0b 40 00 | 00 2f 07 69 6e 74 65 67 |4...|.@.|./.integ|
|00003510| 65 72 00 00 00 00 00 00 | 00 00 98 01 92 1a 00 00 |er......|........|
|00003520| 2e 09 09 09 7b 74 65 6d | 70 20 76 61 72 69 61 62 |....{tem|p variab|
|00003530| 6c 65 20 66 6f 72 20 75 | 73 61 67 65 20 66 6f 72 |le for u|sage for|
|00003540| 20 74 79 70 65 20 63 6f | 65 72 63 69 6f 6e 7d 6c | type co|ercion}l|
|00003550| 94 01 94 01 7e 03 00 00 | 40 b0 80 10 5c 07 74 68 |....~...|@...\.th|
|00003560| 65 49 74 65 6d 0a 5c 06 | 4c 6f 57 6f 72 64 10 5c |eItem.\.|LoWord.\|
|00003570| 07 6d 52 65 73 75 6c 74 | 16 08 98 01 92 17 00 00 |.mResult|........|
|00003580| 28 09 09 7b 63 61 6c 6c | 20 54 6f 6f 6c 62 6f 78 |(..{call| Toolbox|
|00003590| 20 75 74 69 6c 69 74 79 | 20 72 6f 75 74 69 6e 65 | utility| routine|
|000035a0| 73 20 74 6f 20 73 65 74 | 7d 5c 80 10 5c 07 74 68 |s to set|}\..\.th|
|000035b0| 65 4d 65 6e 75 0a 5c 06 | 68 69 57 6f 72 64 10 5c |eMenu.\.|hiWord.\|
|000035c0| 07 6d 52 65 73 75 6c 74 | 16 08 98 01 92 15 00 00 |.mResult|........|
|000035d0| 24 09 09 7b 6d 65 6e 75 | 20 69 74 65 6d 20 6e 75 |$..{menu| item nu|
|000035e0| 6d 62 65 72 20 61 6e 64 | 20 6d 65 6e 75 20 6e 75 |mber and| menu nu|
|000035f0| 6d 62 65 72 7d 20 94 01 | 88 0f 40 52 00 00 00 08 |mber} ..|..@R....|
|00003600| 15 80 00 00 00 00 00 00 | 00 00 00 5c 07 74 68 65 |........|...\.the|
|00003610| 4d 65 6e 75 6c 08 92 0e | 00 00 16 20 09 09 09 09 |Menul...|... ....|
|00003620| 7b 63 61 73 65 20 6f 6e | 20 6d 65 6e 75 20 49 44 |{case on| menu ID|
|00003630| 7d 1c 94 01 92 07 00 01 | 09 7b 3d 3d 3d 3d 3d 3d |}.......|.{======|
|00003640| 3d 7d 7c 0b 00 00 08 aa | 07 61 70 70 6c 65 49 44 |=}|.....|.appleID|
|00003650| 39 1c 00 02 00 00 00 00 | a6 01 86 0c 5c 07 74 68 |9.......|....\.th|
|00003660| 65 49 74 65 6d 44 5c 09 | 61 62 6f 75 74 49 74 65 |eItemD\.|aboutIte|
|00003670| 6d 08 7c 0d 00 00 00 00 | 0b 44 6f 41 70 70 6c 65 |m.|.....|.DoApple|
|00003680| 4d 65 6e 75 00 00 00 00 | 00 00 00 00 92 1a 00 00 |Menu....|........|
|00003690| 2f 09 09 7b 2a 2a 2a 20 | 41 44 44 45 44 20 54 4f |/..{*** |ADDED TO|
|000036a0| 20 54 52 59 20 55 53 45 | 20 4e 45 57 20 27 41 4c | TRY USE| NEW 'AL|
|000036b0| 45 52 54 27 20 4d 45 54 | 48 4f 44 20 2a 2a 2a 7d |ERT' MET|HOD ***}|
|000036c0| 92 19 00 01 2c 7b 44 6f | 41 62 6f 75 74 42 6f 78 |....,{Do|AboutBox|
|000036d0| 20 20 2a 2a 2a 20 4f 52 | 49 47 49 4e 41 4c 20 53 |  *** OR|IGINAL S|
|000036e0| 68 6f 77 4f 66 66 20 43 | 4f 44 45 20 4c 49 4e 45 |howOff C|ODE LINE|
|000036f0| 7d 7d 96 01 7e 03 00 00 | 38 ea 84 18 07 47 65 74 |}}..~...|8....Get|
|00003700| 49 74 65 6d 10 5c 07 6d | 79 4d 65 6e 75 73 18 5c |Item.\.m|yMenus.\|
|00003710| 06 61 70 70 6c 65 4d 1c | 12 5c 07 74 68 65 49 74 |.appleM.|.\.theIt|
|00003720| 65 6d 12 5c 04 6e 61 6d | 65 16 98 01 92 23 00 01 |em.\.nam|e....#..|
|00003730| 40 7b 47 65 74 50 6f 72 | 74 20 28 73 61 76 65 64 |@{GetPor|t (saved|
|00003740| 50 6f 72 74 29 3b 09 09 | 09 54 48 49 53 20 49 53 |Port);..|.THIS IS|
|00003750| 20 54 48 45 20 57 41 59 | 20 49 54 20 57 41 53 20 | THE WAY| IT WAS |
|00003760| 20 49 4e 20 54 48 45 20 | 4f 52 49 47 49 4e 41 4c | IN THE |ORIGINAL|
|00003770| 7d 45 80 0c 5c 08 73 63 | 72 61 70 45 72 72 0a 5c |}E..\.sc|rapErr.\|
|00003780| 09 5a 65 72 6f 53 63 72 | 61 70 98 01 80 0d 5c 0a |.ZeroScr|ap....\.|
|00003790| 73 63 72 43 6f 70 79 45 | 72 72 0a 5c 09 54 45 54 |scrCopyE|rr.\.TET|
|000037a0| 6f 53 63 72 61 70 98 01 | 80 0f 5c 04 74 65 6d 70 |oScrap..|..\.temp|
|000037b0| 0a 5c 0b 4f 70 65 6e 44 | 65 73 6b 41 63 63 10 5c |.\.OpenD|eskAcc.\|
|000037c0| 04 6e 61 6d 65 16 98 01 | 84 14 0a 45 6e 61 62 6c |.name...|...Enabl|
|000037d0| 65 49 74 65 6d 10 5c 07 | 6d 79 4d 65 6e 75 73 18 |eItem.\.|myMenus.|
|000037e0| 5c 05 65 64 69 74 4d 1c | 12 08 5a 03 00 00 16 08 |\.editM.|..Z.....|
|000037f0| 98 01 92 22 00 01 3e 7b | 53 65 74 50 6f 72 74 20 |..."..>{|SetPort |
|00003800| 28 73 61 76 65 64 50 6f | 72 74 29 3b 09 09 54 48 |(savedPo|rt);..TH|
|00003810| 49 53 20 49 53 20 54 48 | 45 20 57 41 59 20 49 54 |IS IS TH|E WAY IT|
|00003820| 20 57 41 53 20 49 4e 20 | 54 48 45 20 4f 52 49 47 | WAS IN |THE ORIG|
|00003830| 49 4e 41 4c 7d 38 86 09 | 5c 0b 46 72 6f 6e 74 57 |INAL}8..|\.FrontW|
|00003840| 69 6e 64 6f 77 46 58 08 | 7e 03 00 00 38 ae 84 17 |indowFX.|~...8...|
|00003850| 0a 45 6e 61 62 6c 65 49 | 74 65 6d 10 5c 07 6d 79 |.EnableI|tem.\.my|
|00003860| 4d 65 6e 75 73 18 5c 05 | 66 69 6c 65 4d 1c 12 5c |Menus.\.|fileM..\|
|00003870| 09 63 6c 6f 73 65 49 74 | 65 6d 16 08 98 01 84 16 |.closeIt|em......|
|00003880| 0a 45 6e 61 62 6c 65 49 | 74 65 6d 10 5c 07 6d 79 |.EnableI|tem.\.my|
|00003890| 4d 65 6e 75 73 18 5c 05 | 65 64 69 74 4d 1c 12 5c |Menus.\.|editM..\|
|000038a0| 08 75 6e 64 6f 49 74 65 | 6d 16 98 01 9a 01 98 01 |.undoIte|m.......|
|000038b0| 92 11 00 00 1d 09 09 7b | 69 66 20 46 72 6f 6e 74 |.......{|if Front|
|000038c0| 57 69 6e 64 6f 77 20 74 | 68 65 6e 20 62 65 67 69 |Window t|hen begi|
|000038d0| 6e 7d 80 0a 5c 07 6d 65 | 6e 75 73 4f 4b 0a 5c 05 |n}..\.me|nusOK.\.|
|000038e0| 66 61 6c 73 65 08 98 01 | 9a 01 98 01 92 10 00 00 |false...|........|
|000038f0| 1b 09 09 7b 69 66 20 74 | 68 65 49 74 65 6d 2e 2e |...{if t|heItem..|
|00003900| 2e 65 6c 73 65 20 62 65 | 67 69 6e 7d 94 01 92 07 |.else be|gin}....|
|00003910| 00 01 09 7b 3d 3d 3d 3d | 3d 3d 3d 7d 7c 0b 00 00 |...{====|===}|...|
|00003920| 09 02 06 66 69 6c 65 49 | 44 08 3d de 00 06 00 00 |...fileI|D.=.....|
|00003930| 00 00 a6 01 88 0f 3d b6 | 00 00 00 08 15 80 00 00 |......=.|........|
|00003940| 00 00 00 00 00 00 00 5c | 07 74 68 65 49 74 65 6d |.......\|.theItem|
|00003950| 6c 08 94 01 7c 0b 00 00 | 0b 1c 07 6e 65 77 49 74 |l...|...|...newIt|
|00003960| 65 6d 39 8a 00 09 00 00 | 00 00 a6 01 7c 0d 00 00 |em9.....|....|...|
|00003970| 00 00 0a 4f 70 65 6e 57 | 69 6e 64 6f 77 08 00 00 |...OpenW|indow...|
|00003980| 00 00 00 00 00 00 98 01 | 94 01 7c 0c 00 00 0b 54 |........|..|....T|
|00003990| 09 63 6c 6f 73 65 49 74 | 65 6d 3d 02 00 0a 00 00 |.closeIt|em=.....|
|000039a0| 00 00 a6 01 7e 03 00 00 | 3d 00 94 01 92 21 00 01 |....~...|=....!..|
|000039b0| 3c 7b 42 45 4c 4f 57 20 | 41 52 45 20 54 48 45 20 |<{BELOW |ARE THE |
|000039c0| 4f 52 49 47 49 4e 41 4c | 20 53 54 41 54 45 4d 45 |ORIGINAL| STATEME|
|000039d0| 4e 54 53 20 57 48 49 43 | 48 20 4c 53 50 20 57 4f |NTS WHIC|H LSP WO|
|000039e0| 55 4c 44 4e 27 54 20 41 | 4c 4c 4f 57 7d 48 92 19 |ULDN'T A|LLOW}H..|
|000039f0| 00 01 2c 7b 69 66 20 57 | 69 6e 64 6f 77 50 65 65 |..,{if W|indowPee|
|00003a00| 6b 28 46 72 6f 6e 74 57 | 69 6e 64 6f 77 29 5e 2e |k(FrontW|indow)^.|
|00003a10| 77 69 6e 64 6f 77 4b 69 | 6e 64 20 3c 20 30 7d 01 |windowKi|nd < 0}.|
|00003a20| 92 23 00 01 40 7b 20 20 | 20 20 74 68 65 6e 20 43 |.#..@{  |  then C|
|00003a30| 6c 6f 73 65 44 65 73 6b | 41 63 63 20 28 77 69 6e |loseDesk|Acc (win|
|00003a40| 64 6f 77 50 65 65 6b 20 | 28 46 72 6f 6e 74 57 69 |dowPeek |(FrontWi|
|00003a50| 6e 64 6f 77 29 5e 2e 77 | 69 6e 64 6f 77 4b 69 6e |ndow)^.w|indowKin|
|00003a60| 64 29 20 20 7d 00 94 01 | 92 1f 00 01 39 7b 54 48 |d)  }...|....9{TH|
|00003a70| 45 53 45 20 41 52 45 20 | 54 48 45 20 46 49 58 45 |ESE ARE |THE FIXE|
|00003a80| 44 20 53 54 41 54 45 4d | 45 4e 54 53 2c 20 43 4f |D STATEM|ENTS, CO|
|00003a90| 45 52 43 45 44 20 49 4e | 54 4f 20 41 43 43 45 50 |ERCED IN|TO ACCEP|
|00003aa0| 54 41 4e 43 45 7d 80 15 | 5c 09 6d 79 57 69 6e 50 |TANCE}..|\.myWinP|
|00003ab0| 65 65 6b 0a 5c 0a 57 69 | 6e 64 6f 77 50 65 65 6b |eek.\.Wi|ndowPeek|
|00003ac0| 10 5c 0b 46 72 6f 6e 74 | 57 69 6e 64 6f 77 16 08 |.\.Front|Window..|
|00003ad0| 98 01 92 14 00 00 23 09 | 7b 73 70 65 63 69 61 6c |......#.|{special|
|00003ae0| 20 63 6f 65 72 63 69 6f | 6e 20 6f 66 20 74 79 70 | coercio|n of typ|
|00003af0| 65 73 20 74 6f 20 67 65 | 74 7d 80 14 5c 0a 74 68 |es to ge|t}..\.th|
|00003b00| 65 57 69 6e 4b 69 6e 64 | 0a 5c 09 6d 79 57 69 6e |eWinKind|.\.myWin|
|00003b10| 50 65 65 6b 54 52 5c 0a | 57 69 6e 64 6f 77 4b 69 |PeekTR\.|WindowKi|
|00003b20| 6e 64 98 01 92 10 00 00 | 1b 09 09 09 7b 61 72 6f |nd......|....{aro|
|00003b30| 75 6e 64 20 4c 50 53 20 | 6c 69 6d 69 74 61 74 69 |und LPS |limitati|
|00003b40| 6f 6e 73 7d 86 0a 5c 0a | 74 68 65 57 69 6e 6b 69 |ons}..\.|theWinki|
|00003b50| 6e 64 48 08 5a 03 00 00 | 92 10 00 00 1a 09 09 09 |ndH.Z...|........|
|00003b60| 09 09 09 09 7b 63 6f 65 | 72 63 65 64 20 73 74 61 |....{coe|rced sta|
|00003b70| 74 65 6d 65 6e 74 7d 00 | 84 0f 0c 43 6c 6f 73 65 |tement}.|...Close|
|00003b80| 44 65 73 6b 41 63 63 10 | 5c 0a 74 68 65 57 69 6e |DeskAcc.|\.theWin|
|00003b90| 4b 69 6e 64 16 08 92 16 | 00 00 27 09 09 7b 69 66 |Kind....|..'..{if|
|00003ba0| 20 69 74 27 73 20 61 20 | 64 65 73 6b 20 61 63 63 | it's a |desk acc|
|00003bb0| 20 77 69 6e 64 6f 77 2c | 20 63 6c 6f 73 65 20 69 | window,| close i|
|00003bc0| 74 7d 94 01 96 01 7e 03 | 00 00 00 00 84 10 0d 44 |t}....~.|.......D|
|00003bd0| 69 73 70 6f 73 65 57 69 | 6e 64 6f 77 10 5c 0b 46 |isposeWi|ndow.\.F|
|00003be0| 72 6f 6e 74 57 69 6e 64 | 6f 77 16 08 98 01 92 12 |rontWind|ow......|
|00003bf0| 00 00 1f 09 09 7b 69 66 | 20 69 74 27 73 20 6d 69 |.....{if| it's mi|
|00003c00| 6e 65 2c 20 62 6c 6f 77 | 20 69 74 20 61 77 61 79 |ne, blow| it away|
|00003c10| 21 7d 84 0e 0a 4b 69 6c | 6c 57 69 6e 64 6f 77 10 |!}...Kil|lWindow.|
|00003c20| 5c 0b 46 72 6f 6e 74 57 | 69 6e 64 6f 77 16 98 01 |\.FrontW|indow...|
|00003c30| 9a 01 98 01 92 12 00 00 | 1e 09 09 7b 69 66 20 57 |........|...{if W|
|00003c40| 69 6e 64 6f 77 50 65 65 | 6b 2e 2e 2e 65 6c 73 65 |indowPee|k...else|
|00003c50| 20 62 65 67 69 6e 7d f2 | 9a 01 98 01 7c 0c 00 00 | begin}.|....|...|
|00003c60| 0b 70 08 71 75 69 74 49 | 74 65 6d 08 00 00 00 0d |.p.quitI|tem.....|
|00003c70| 00 00 00 00 a6 01 80 0a | 5c 08 64 6f 6e 65 46 6c |........|\.doneFl|
|00003c80| 61 67 0a 5c 04 54 72 75 | 65 08 98 01 92 0b 00 00 |ag.\.Tru|e.......|
|00003c90| 10 09 09 7b 71 75 69 74 | 20 70 72 6f 67 72 61 6d |...{quit| program|
|00003ca0| 7d 19 9c 01 92 34 00 00 | 62 09 09 7b 61 64 64 65 |}....4..|b..{adde|
|00003cb0| 64 20 74 6f 20 73 61 74 | 69 73 66 79 20 4c 69 67 |d to sat|isfy Lig|
|00003cc0| 68 74 53 70 65 65 64 73 | 20 43 41 53 45 20 73 74 |htSpeeds| CASE st|
|00003cd0| 61 74 65 6d 65 6e 74 20 | 6e 65 65 64 73 2c 20 61 |atement |needs, a|
|00003ce0| 76 6f 69 64 73 20 27 43 | 61 73 65 20 53 65 6c 65 |voids 'C|ase Sele|
|00003cf0| 63 74 6f 72 20 52 61 6e | 67 65 20 28 54 72 61 70 |ctor Ran|ge (Trap|
|00003d00| 20 34 29 27 20 65 72 72 | 6f 72 7d 00 94 01 9a 01 | 4)' err|or}.....|
|00003d10| 98 01 92 0b 00 00 10 09 | 09 7b 63 61 73 65 20 74 |........|.{case t|
|00003d20| 68 65 49 74 65 6d 7d 00 | 94 01 92 07 00 01 09 7b |heItem}.|.......{|
|00003d30| 3d 3d 3d 3d 3d 3d 3d 7d | 7c 0b 00 00 09 1c 06 65 |=======}||......e|
|00003d40| 64 69 74 49 44 08 00 00 | 00 0e 00 00 00 00 a6 01 |ditID...|........|
|00003d50| 7e 03 00 00 3f cc 86 10 | 24 5c 0a 53 79 73 74 65 |~...?...|$\.Syste|
|00003d60| 6d 45 64 69 74 10 5c 07 | 74 68 65 49 74 65 6d 3c |mEdit.\.|theItem<|
|00003d70| 5a 03 00 01 16 08 88 0f | 3f b2 00 00 00 08 15 80 |Z.......|?.......|
|00003d80| 00 00 00 00 00 00 00 00 | 00 5c 07 74 68 65 49 74 |........|.\.theIt|
|00003d90| 65 6d 6c 08 92 11 00 00 | 1d 20 09 09 7b 63 61 73 |eml.....|. ..{cas|
|00003da0| 65 20 6f 6e 20 6d 65 6e | 75 20 69 74 65 6d 20 6e |e on men|u item n|
|00003db0| 75 6d 62 65 72 7d 94 01 | 7c 0b 00 00 0a ac 07 63 |umber}..||......c|
|00003dc0| 75 74 49 74 65 6d 3e b2 | 00 12 00 00 00 00 a6 01 |utItem>.|........|
|00003dd0| 84 09 05 54 45 43 75 74 | 10 5c 05 74 65 78 74 48 |...TECut|.\.textH|
|00003de0| 16 08 98 01 92 13 00 00 | 20 09 09 7b 63 61 6c 6c |........| ..{call|
|00003df0| 20 54 65 78 74 45 64 69 | 74 20 74 6f 20 68 61 6e | TextEdi|t to han|
|00003e00| 64 6c 65 20 49 74 65 6d | 7d 6f 94 01 7c 0c 00 00 |dle Item|}o..|...|
|00003e10| 0a c8 08 63 6f 70 79 49 | 74 65 6d 08 3e e2 00 13 |...copyI|tem.>...|
|00003e20| 00 00 00 00 a6 01 84 09 | 06 54 45 43 6f 70 79 10 |........|.TECopy.|
|00003e30| 5c 05 74 65 78 74 48 16 | 98 01 94 01 7c 0c 00 00 |\.textH.|....|...|
|00003e40| 0a e4 09 50 61 73 74 65 | 49 74 65 6d 3f 14 00 14 |...Paste|Item?...|
|00003e50| 00 00 00 00 a6 01 84 0a | 07 54 45 50 61 73 74 65 |........|.TEPaste|
|00003e60| 10 5c 05 74 65 78 74 48 | 16 08 98 01 94 01 7c 0c |.\.textH|......|.|
|00003e70| 00 00 0b 00 09 63 6c 65 | 61 72 49 74 65 6d 00 00 |.....cle|arItem..|
|00003e80| 00 15 00 00 00 00 a6 01 | 84 0a 08 54 45 44 65 6c |........|...TEDel|
|00003e90| 65 74 65 10 5c 05 74 65 | 78 74 48 16 98 01 94 01 |ete.\.te|xtH.....|
|00003ea0| 9c 01 92 34 00 00 62 09 | 09 7b 61 64 64 65 64 20 |...4..b.|.{added |
|00003eb0| 74 6f 20 73 61 74 69 73 | 66 79 20 4c 69 67 68 74 |to satis|fy Light|
|00003ec0| 53 70 65 65 64 73 20 43 | 41 53 45 20 73 74 61 74 |Speeds C|ASE stat|
|00003ed0| 65 6d 65 6e 74 20 6e 65 | 65 64 73 2c 20 61 76 6f |ement ne|eds, avo|
|00003ee0| 69 64 73 20 27 43 61 73 | 65 20 53 65 6c 65 63 74 |ids 'Cas|e Select|
|00003ef0| 6f 72 20 52 61 6e 67 65 | 20 28 54 72 61 70 20 34 |or Range| (Trap 4|
|00003f00| 29 27 20 65 72 72 6f 72 | 7d 61 9a 01 98 01 92 0b |)' error|}a......|
|00003f10| 00 00 10 09 09 7b 63 61 | 73 65 20 74 68 65 49 74 |.....{ca|se theIt|
|00003f20| 65 6d 7d 73 9a 01 98 01 | 92 0b 00 00 10 09 09 7b |em}s....|.......{|
|00003f30| 65 64 69 74 49 44 20 62 | 65 67 69 6e 7d 03 9c 01 |editID b|egin}...|
|00003f40| 92 34 00 00 62 09 09 7b | 61 64 64 65 64 20 74 6f |.4..b..{|added to|
|00003f50| 20 73 61 74 69 73 66 79 | 20 4c 69 67 68 74 53 70 | satisfy| LightSp|
|00003f60| 65 65 64 73 20 43 41 53 | 45 20 73 74 61 74 65 6d |eeds CAS|E statem|
|00003f70| 65 6e 74 20 6e 65 65 64 | 73 2c 20 61 76 6f 69 64 |ent need|s, avoid|
|00003f80| 73 20 27 43 61 73 65 20 | 53 65 6c 65 63 74 6f 72 |s 'Case |Selector|
|00003f90| 20 52 61 6e 67 65 20 28 | 54 72 61 70 20 34 29 27 | Range (|Trap 4)'|
|00003fa0| 20 65 72 72 6f 72 7d 50 | 94 01 9a 01 98 01 92 0b | error}P|........|
|00003fb0| 00 00 10 09 09 7b 63 61 | 73 65 20 74 68 65 4d 65 |.....{ca|se theMe|
|00003fc0| 6e 75 7d 3c 84 0a 0a 48 | 69 6c 69 74 65 4d 65 6e |nu}<...H|iliteMen|
|00003fd0| 75 10 5a 03 00 00 16 08 | 98 01 92 17 00 00 28 09 |u.Z.....|......(.|
|00003fe0| 09 09 09 7b 75 6e 68 69 | 6c 69 74 65 20 74 68 65 |...{unhi|lite the|
|00003ff0| 20 6d 65 6e 75 20 77 68 | 69 63 68 20 77 61 73 20 | menu wh|ich was |
|00004000| 61 63 74 69 76 65 7d 06 | 9a 01 98 01 92 0e 00 00 |active}.|........|
|00004010| 17 09 09 7b 70 72 6f 63 | 65 64 75 72 65 20 44 6f |...{proc|edure Do|
|00004020| 43 6f 6d 6d 61 6e 64 7d | 92 22 00 01 3e 7b 3d 3d |Command}|."..>{==|
|00004030| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004040| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004050| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004060| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 7d 00 94 01 92 22 |========|==}...."|
|00004070| 00 01 3e 7b 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..>{====|========|
|00004080| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004090| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000040a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000040b0| 7d 00 b0 11 00 00 00 00 | 00 00 09 46 69 78 43 75 |}.......|...FixCu|
|000040c0| 72 73 6f 72 81 00 42 0c | 00 00 01 00 41 82 06 ba |rsor..B.|....A...|
|000040d0| 00 08 00 00 98 01 94 01 | ba 01 7c 0c 00 00 41 b2 |........|..|...A.|
|000040e0| 08 6d 6f 75 73 65 4c 6f | 63 08 12 00 41 9c ff ec |.mouseLo|c...A...|
|000040f0| 41 86 a6 01 7c 0a 40 00 | 0a e7 05 70 6f 69 6e 74 |A...|.@.|...point|
|00004100| 00 00 00 00 00 00 00 00 | 98 01 7c 0c 00 00 00 00 |........|..|.....|
|00004110| 08 6d 79 43 75 72 73 6f | 72 08 12 00 41 cc ff e8 |.myCurso|r...A...|
|00004120| 41 b6 a6 01 7c 0d 40 00 | 43 c3 0a 43 75 72 73 48 |A...|.@.|C..CursH|
|00004130| 61 6e 64 6c 65 08 00 00 | 00 00 00 00 00 00 98 01 |andle...|........|
|00004140| 92 12 00 00 1e 09 09 7b | 74 65 6d 70 20 72 65 67 |.......{|temp reg|
|00004150| 69 73 74 65 72 20 66 6f | 72 20 63 6f 65 72 63 69 |ister fo|r coerci|
|00004160| 6f 6e 7d 00 94 01 7e 03 | 00 00 44 14 84 0c 08 47 |on}...~.|..D....G|
|00004170| 65 74 4d 6f 75 73 65 10 | 5c 08 6d 6f 75 73 65 4c |etMouse.|\.mouseL|
|00004180| 6f 63 16 08 98 01 86 17 | 5c 08 50 74 49 6e 52 65 |oc......|\.PtInRe|
|00004190| 63 74 10 5c 08 6d 6f 75 | 73 65 4c 6f 63 12 5c 07 |ct.\.mou|seLoc.\.|
|000041a0| 74 68 65 50 6f 72 74 54 | 52 5c 08 70 6f 72 74 52 |thePortT|R\.portR|
|000041b0| 65 63 74 16 94 01 92 20 | 00 01 3a 7b 42 45 4c 4f |ect.... |..:{BELO|
|000041c0| 57 20 49 53 20 54 48 45 | 20 4f 52 49 47 49 4e 41 |W IS THE| ORIGINA|
|000041d0| 4c 20 53 54 41 54 45 4d | 45 4e 54 20 57 48 49 43 |L STATEM|ENT WHIC|
|000041e0| 48 20 4c 53 50 20 57 4f | 55 4c 44 4e 27 54 20 41 |H LSP WO|ULDN'T A|
|000041f0| 4c 4c 4f 57 7d 3a 92 2c | 00 01 52 7b 53 65 74 43 |LLOW}:.,|..R{SetC|
|00004200| 75 72 73 6f 72 20 28 20 | 47 65 74 43 75 72 73 6f |ursor ( |GetCurso|
|00004210| 72 20 28 20 69 42 65 61 | 6d 43 75 72 73 6f 72 20 |r ( iBea|mCursor |
|00004220| 29 20 5e 20 5e 20 29 09 | 09 7b 52 45 54 55 52 4e |) ^ ^ ).|.{RETURN|
|00004230| 45 44 20 27 54 48 49 53 | 20 44 4f 45 53 4e 27 54 |ED 'THIS| DOESN'T|
|00004240| 20 4d 41 4b 45 20 53 45 | 4e 53 45 27 7d 00 94 01 | MAKE SE|NSE'}...|
|00004250| 92 1f 00 01 39 7b 54 48 | 45 53 45 20 41 52 45 20 |....9{TH|ESE ARE |
|00004260| 54 48 45 20 46 49 58 45 | 44 20 53 54 41 54 45 4d |THE FIXE|D STATEM|
|00004270| 45 4e 54 53 2c 20 43 4f | 45 52 43 45 44 20 49 4e |ENTS, CO|ERCED IN|
|00004280| 54 4f 20 41 43 43 45 50 | 54 41 4e 43 45 7d 7e 03 |TO ACCEP|TANCE}~.|
|00004290| 00 00 43 d0 80 14 5c 08 | 6d 79 43 75 72 73 6f 72 |..C...\.|myCursor|
|000042a0| 0a 5c 09 47 65 74 43 75 | 72 73 6f 72 10 5c 0b 69 |.\.GetCu|rsor.\.i|
|000042b0| 42 65 61 6d 43 75 72 73 | 6f 72 16 08 98 01 92 14 |BeamCurs|or......|
|000042c0| 00 00 22 09 09 7b 61 64 | 64 65 64 20 66 6f 72 20 |.."..{ad|ded for |
|000042d0| 50 61 73 63 61 6c 20 74 | 79 70 65 20 63 6f 65 72 |Pascal t|ype coer|
|000042e0| 63 69 6f 6e 7d 20 84 0d | 09 53 65 74 43 75 72 73 |cion} ..|.SetCurs|
|000042f0| 6f 72 10 5c 08 6d 79 43 | 75 72 73 6f 72 54 54 16 |or.\.myC|ursorTT.|
|00004300| 92 13 00 00 20 09 09 7b | 63 6f 65 72 63 65 64 20 |.... ..{|coerced |
|00004310| 69 6e 74 6f 20 77 6f 72 | 6b 69 6e 67 20 69 6e 20 |into wor|king in |
|00004320| 4c 53 50 20 7d 03 9a 01 | 94 01 96 01 84 0b 09 53 |LSP }...|.......S|
|00004330| 65 74 43 75 72 73 6f 72 | 10 5c 05 61 72 72 6f 77 |etCursor|.\.arrow|
|00004340| 16 08 98 01 92 14 00 00 | 23 09 09 7b 6d 61 6b 65 |........|#..{make|
|00004350| 20 74 68 65 20 63 75 72 | 73 6f 72 20 61 6e 20 61 | the cur|sor an a|
|00004360| 72 72 6f 77 20 61 67 61 | 69 6e 20 7d 9a 01 98 01 |rrow aga|in }....|
|00004370| 92 0e 00 00 17 09 09 7b | 70 72 6f 63 65 64 75 72 |.......{|procedur|
|00004380| 65 20 46 69 78 43 75 72 | 73 6f 72 7d 92 22 00 01 |e FixCur|sor}."..|
|00004390| 3e 7b 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |>{======|========|
|000043a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000043b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000043c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 7d d0 |========|======}.|
|000043d0| 94 01 92 22 00 01 3e 7b | 3d 3d 3d 3d 3d 3d 3d 3d |..."..>{|========|
|000043e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000043f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004400| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004410| 3d 3d 3d 3d 7d 4c 92 0c | 00 01 12 7b 09 09 09 4d |====}L..|...{...M|
|00004420| 41 49 4e 20 50 52 4f 47 | 52 41 4d 20 7d 00 92 22 |AIN PROG|RAM }.."|
|00004430| 00 01 3e 7b 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..>{====|========|
|00004440| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004450| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004460| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004470| 7d ba 94 01 94 01 7e 03 | 00 00 64 48 92 0e 00 00 |}.....~.|..dH....|
|00004480| 16 09 09 09 7b 74 68 65 | 20 6d 61 69 6e 20 70 72 |....{the| main pr|
|00004490| 6f 67 72 61 6d 20 7d 3d | 94 01 94 01 92 28 00 01 |ogram }=|.....(..|
|000044a0| 4a 7b 49 6e 69 74 47 72 | 61 66 28 40 74 68 65 50 |J{InitGr|af(@theP|
|000044b0| 6f 72 74 29 3b 09 09 7b | 4c 69 67 68 74 53 70 65 |ort);..{|LightSpe|
|000044c0| 65 64 20 69 6e 69 74 69 | 61 6c 69 7a 65 73 20 74 |ed initi|alizes t|
|000044d0| 68 65 73 65 20 66 6f 72 | 20 79 6f 75 20 61 75 74 |hese for| you aut|
|000044e0| 6f 6d 61 74 69 63 61 6c | 6c 79 7d c4 92 09 00 01 |omatical|ly}.....|
|000044f0| 0c 7b 49 6e 69 74 46 6f | 6e 74 73 3b 7d 96 92 0a |.{InitFo|nts;}...|
|00004500| 00 01 0e 7b 49 6e 69 74 | 57 69 6e 64 6f 77 73 3b |...{Init|Windows;|
|00004510| 7d be 92 09 00 01 0c 7b | 49 6e 69 74 4d 65 6e 75 |}......{|InitMenu|
|00004520| 73 3b 7d 58 92 07 00 01 | 09 7b 54 45 49 6e 69 74 |s;}X....|.{TEInit|
|00004530| 3b 7d 92 0c 00 01 13 7b | 49 6e 69 74 44 69 61 6c |;}.....{|InitDial|
|00004540| 6f 67 73 28 6e 69 6c 29 | 3b 7d 7c 0d 00 00 00 00 |ogs(nil)|;}|.....|
|00004550| 0a 49 6e 69 74 43 75 72 | 73 6f 72 08 00 00 00 00 |.InitCur|sor.....|
|00004560| 00 00 00 00 98 01 92 21 | 00 00 3c 09 09 09 09 7b |.......!|..<....{|
|00004570| 4e 45 45 44 20 54 4f 20 | 49 4e 49 54 20 54 48 49 |NEED TO |INIT THI|
|00004580| 53 20 4f 4e 45 2c 20 45 | 56 45 4e 20 54 48 4f 55 |S ONE, E|VEN THOU|
|00004590| 47 48 20 4c 53 50 20 53 | 41 59 53 20 49 54 20 44 |GH LSP S|AYS IT D|
|000045a0| 4f 45 53 20 49 54 7d 79 | 94 01 84 11 0b 46 6c 75 |OES IT}y|.....Flu|
|000045b0| 73 68 45 76 65 6e 74 73 | 10 5c 0a 65 76 65 72 79 |shEvents|.\.every|
|000045c0| 45 76 65 6e 74 12 5a 03 | 00 00 16 08 98 01 94 01 |Event.Z.|........|
|000045d0| 7c 0d 00 00 00 00 0a 53 | 65 74 55 70 4d 65 6e 75 ||......S|etUpMenu|
|000045e0| 73 08 00 00 00 00 00 00 | 00 00 98 01 90 0c 5c 0a |s.......|......\.|
|000045f0| 73 63 72 65 65 6e 42 69 | 74 73 52 5c 06 62 6f 75 |screenBi|tsR\.bou|
|00004600| 6e 64 73 08 84 1f 07 53 | 65 74 52 65 63 74 10 5c |nds....S|etRect.\|
|00004610| 08 64 72 61 67 52 65 63 | 74 12 5a 03 00 04 12 08 |.dragRec|t.Z.....|
|00004620| 5a 03 00 18 12 5c 05 72 | 69 67 68 74 3c 08 5a 03 |Z....\.r|ight<.Z.|
|00004630| 00 04 12 5c 06 62 6f 74 | 74 6f 6d 3c 5a 03 00 04 |...\.bot|tom<Z...|
|00004640| 16 08 98 01 80 0a 5c 08 | 64 6f 6e 65 46 6c 61 67 |......\.|doneFlag|
|00004650| 0a 5c 05 66 61 6c 73 65 | 98 01 94 01 80 0a 5c 07 |.\.false|......\.|
|00004660| 6d 65 6e 75 73 4f 4b 0a | 5c 05 66 61 6c 73 65 08 |menusOK.|\.false.|
|00004670| 98 01 80 09 5c 08 6e 65 | 78 74 57 4e 75 6d 0a 08 |....\.ne|xtWNum..|
|00004680| 5a 03 00 01 98 01 92 11 | 00 00 1c 09 09 7b 69 6e |Z.......|.....{in|
|00004690| 69 74 69 61 6c 69 7a 65 | 20 77 69 6e 64 6f 77 20 |itialize| window |
|000046a0| 6e 75 6d 62 65 72 7d 09 | 84 21 07 53 65 74 52 65 |number}.|.!.SetRe|
|000046b0| 63 74 10 5c 09 6e 65 78 | 74 57 52 65 63 74 12 5c |ct.\.nex|tWRect.\|
|000046c0| 08 6c 65 66 74 45 64 67 | 65 12 5c 07 74 6f 70 45 |.leftEdg|e.\.topE|
|000046d0| 64 67 65 12 5c 09 72 69 | 67 68 74 45 64 67 65 12 |dge.\.ri|ghtEdge.|
|000046e0| 5c 07 62 6f 74 45 64 67 | 65 16 98 01 92 14 00 00 |\.botEdg|e.......|
|000046f0| 22 09 09 7b 69 6e 69 74 | 61 6c 69 7a 65 20 74 68 |"..{init|alize th|
|00004700| 65 20 77 69 6e 64 6f 77 | 20 72 65 63 74 61 6e 67 |e window| rectang|
|00004710| 6c 65 7d 72 94 01 7c 0d | 00 00 00 00 0a 4f 70 65 |le}r..|.|.....Ope|
|00004720| 6e 57 69 6e 64 6f 77 08 | 00 00 00 00 00 00 00 00 |nWindow.|........|
|00004730| 98 01 92 12 00 00 1e 09 | 09 7b 73 74 61 72 74 20 |........|.{start |
|00004740| 77 69 74 68 20 6f 6e 65 | 20 6f 70 65 6e 20 77 69 |with one| open wi|
|00004750| 6e 64 6f 77 7d 12 94 01 | 92 07 00 01 09 7b 3d 3d |ndow}...|.....{==|
|00004760| 3d 3d 3d 3d 3d 7d 92 0b | 00 01 11 7b 4d 61 69 6e |=====}..|...{Main|
|00004770| 20 65 76 65 6e 74 20 6c | 6f 6f 70 7d 94 01 8c 02 | event l|oop}....|
|00004780| 64 44 7c 0d 00 00 00 00 | 0a 53 79 73 74 65 6d 54 |dD|.....|.SystemT|
|00004790| 61 73 6b 08 00 00 00 00 | 00 00 00 00 98 01 86 09 |ask.....|........|
|000047a0| 5c 0b 46 72 6f 6e 74 57 | 69 6e 64 6f 77 46 58 08 |\.FrontW|indowFX.|
|000047b0| 92 16 00 00 26 09 09 7b | 69 66 20 74 68 65 72 65 |....&..{|if there|
|000047c0| 20 69 73 20 69 6e 64 65 | 65 64 20 61 20 77 69 6e | is inde|ed a win|
|000047d0| 64 6f 77 20 61 63 74 69 | 76 65 7d 00 94 01 92 20 |dow acti|ve}.... |
|000047e0| 00 01 3a 7b 42 45 4c 4f | 57 20 49 53 20 54 48 45 |..:{BELO|W IS THE|
|000047f0| 20 4f 52 49 47 49 4e 41 | 4c 20 53 54 41 54 45 4d | ORIGINA|L STATEM|
|00004800| 45 4e 54 20 57 48 49 43 | 48 20 4c 53 50 20 57 4f |ENT WHIC|H LSP WO|
|00004810| 55 4c 44 4e 27 54 20 41 | 4c 4c 4f 57 7d e6 92 1a |ULDN'T A|LLOW}...|
|00004820| 00 01 2f 7b 69 66 20 57 | 69 6e 64 6f 77 50 65 65 |../{if W|indowPee|
|00004830| 6b 20 28 46 72 6f 6e 74 | 57 69 6e 64 6f 77 29 5e |k (Front|Window)^|
|00004840| 2e 77 69 6e 64 6f 77 4b | 69 6e 64 20 3e 3d 20 30 |.windowK|ind >= 0|
|00004850| 20 7d 94 01 92 1f 00 01 | 39 7b 54 48 45 53 45 20 | }......|9{THESE |
|00004860| 41 52 45 20 54 48 45 20 | 46 49 58 45 44 20 53 54 |ARE THE |FIXED ST|
|00004870| 41 54 45 4d 45 4e 54 53 | 2c 20 43 4f 45 52 43 45 |ATEMENTS|, COERCE|
|00004880| 44 20 49 4e 54 4f 20 41 | 43 43 45 50 54 41 4e 43 |D INTO A|CCEPTANC|
|00004890| 45 7d 7e 03 00 00 4a 5e | 92 07 00 00 09 09 09 7b |E}~...J^|.......{|
|000048a0| 41 44 44 45 44 7d 80 15 | 5c 09 6d 79 57 69 6e 50 |ADDED}..|\.myWinP|
|000048b0| 65 65 6b 0a 5c 0a 57 69 | 6e 64 6f 77 50 65 65 6b |eek.\.Wi|ndowPeek|
|000048c0| 10 5c 0b 46 72 6f 6e 74 | 57 69 6e 64 6f 77 16 08 |.\.Front|Window..|
|000048d0| 98 01 92 15 00 00 24 09 | 09 7b 73 70 65 63 69 61 |......$.|.{specia|
|000048e0| 6c 20 63 6f 65 72 63 69 | 6f 6e 20 6f 66 20 74 79 |l coerci|on of ty|
|000048f0| 70 65 73 20 74 6f 20 67 | 65 74 7d 78 80 14 5c 0a |pes to g|et}x..\.|
|00004900| 74 68 65 57 69 6e 4b 69 | 6e 64 0a 5c 09 6d 79 57 |theWinKi|nd.\.myW|
|00004910| 69 6e 50 65 65 6b 54 52 | 5c 0a 57 69 6e 64 6f 77 |inPeekTR|\.Window|
|00004920| 4b 69 6e 64 98 01 92 10 | 00 00 1b 09 09 09 7b 61 |Kind....|......{a|
|00004930| 72 6f 75 6e 64 20 4c 50 | 53 20 6c 69 6d 69 74 61 |round LP|S limita|
|00004940| 74 69 6f 6e 73 7d 86 0a | 5c 0a 74 68 65 57 69 6e |tions}..|\.theWin|
|00004950| 4b 69 6e 64 4e 08 5a 03 | 00 00 92 20 00 00 3a 20 |KindN.Z.|... ..: |
|00004960| 09 7b 69 66 20 69 74 27 | 73 20 6f 74 68 65 72 20 |.{if it'|s other |
|00004970| 74 68 61 6e 20 61 20 64 | 65 73 6b 20 61 63 63 65 |than a d|esk acce|
|00004980| 73 73 6f 72 79 2c 20 63 | 6f 65 72 63 65 64 20 73 |ssory, c|oerced s|
|00004990| 74 61 74 65 6d 65 6e 74 | 7d 6c 94 01 7c 0c 00 00 |tatement|}l..|...|
|000049a0| 00 00 09 46 69 78 43 75 | 72 73 6f 72 00 00 00 00 |...FixCu|rsor....|
|000049b0| 00 00 00 00 98 01 9a 01 | 98 01 92 07 00 00 09 09 |........|........|
|000049c0| 09 7b 41 44 44 45 44 7d | 86 0f 24 5c 07 6d 65 6e |.{ADDED}|..$\.men|
|000049d0| 75 73 4f 4b 38 20 5c 0b | 46 72 6f 6e 74 57 69 6e |usOK8 \.|FrontWin|
|000049e0| 64 6f 77 44 58 22 7e 03 | 00 00 4b 02 84 17 0b 44 |dowDX"~.|..K....D|
|000049f0| 69 73 61 62 6c 65 49 74 | 65 6d 10 5c 07 6d 79 4d |isableIt|em.\.myM|
|00004a00| 65 6e 75 73 18 5c 05 66 | 69 6c 65 4d 1c 12 5c 09 |enus.\.f|ileM..\.|
|00004a10| 63 6c 6f 73 65 49 74 65 | 6d 16 98 01 84 14 0b 44 |closeIte|m......D|
|00004a20| 69 73 61 62 6c 65 49 74 | 65 6d 10 5c 07 6d 79 4d |isableIt|em.\.myM|
|00004a30| 65 6e 75 73 18 5c 05 65 | 64 69 74 4d 1c 12 5a 03 |enus.\.e|ditM..Z.|
|00004a40| 00 00 16 08 98 01 80 09 | 5c 07 6d 65 6e 75 73 4f |........|\.menusO|
|00004a50| 4b 0a 5c 04 74 72 75 65 | 98 01 9a 01 98 01 92 13 |K.\.true|........|
|00004a60| 00 00 20 20 09 09 7b 69 | 66 20 46 72 6f 6e 74 57 |..  ..{i|f FrontW|
|00004a70| 69 6e 64 6f 77 2e 2e 2e | 74 68 65 6e 20 62 65 67 |indow...|then beg|
|00004a80| 69 6e 7d 28 84 09 06 54 | 45 49 64 6c 65 10 5c 05 |in}(...T|EIdle.\.|
|00004a90| 74 65 78 74 48 16 98 01 | 94 01 86 14 5c 0c 47 65 |textH...|....\.Ge|
|00004aa0| 74 4e 65 78 74 45 76 65 | 6e 74 10 5c 0a 65 76 65 |tNextEve|nt.\.eve|
|00004ab0| 72 79 45 76 65 6e 74 12 | 5c 07 6d 79 45 76 65 6e |ryEvent.|\.myEven|
|00004ac0| 74 16 88 13 64 1a 00 00 | 00 08 15 80 00 00 00 00 |t...d...|........|
|00004ad0| 00 00 00 00 00 5c 07 6d | 79 45 76 65 6e 74 52 5c |.....\.m|yEventR\|
|00004ae0| 04 77 68 61 74 08 6c 08 | 94 01 7c 0c 00 00 12 a1 |.what.l.|..|.....|
|00004af0| 09 6d 6f 75 73 65 44 6f | 77 6e 50 ae 00 08 00 00 |.mouseDo|wnP.....|
|00004b00| 00 00 a6 01 88 21 50 92 | 00 00 00 08 15 80 00 00 |.....!P.|........|
|00004b10| 00 00 00 00 00 00 00 5c | 0a 46 69 6e 64 57 69 6e |.......\|.FindWin|
|00004b20| 64 6f 77 10 5c 07 6d 79 | 45 76 65 6e 74 52 5c 05 |dow.\.my|EventR\.|
|00004b30| 77 68 65 72 65 12 5c 0b | 77 68 69 63 68 57 69 6e |where.\.|whichWin|
|00004b40| 64 6f 77 16 6c 08 94 01 | 7c 0d 00 00 3b 5b 0b 69 |dow.l...||...;[.i|
|00004b50| 6e 53 79 73 57 69 6e 64 | 6f 77 4e 9a 00 0b 00 00 |nSysWind|owN.....|
|00004b60| 00 00 a6 01 84 14 0b 53 | 79 73 74 65 6d 43 6c 69 |.......S|ystemCli|
|00004b70| 63 6b 10 5c 07 6d 79 45 | 76 65 6e 74 12 5c 0b 77 |ck.\.myE|vent.\.w|
|00004b80| 68 69 63 68 57 69 6e 64 | 6f 77 16 08 98 01 94 01 |hichWind|ow......|
|00004b90| 7c 0c 00 00 3b 41 09 69 | 6e 4d 65 6e 75 42 61 72 ||...;A.i|nMenuBar|
|00004ba0| 4d b0 00 0c 00 00 00 00 | a6 01 84 17 09 44 6f 43 |M.......|.....DoC|
|00004bb0| 6f 6d 6d 61 6e 64 10 5c | 0a 4d 65 6e 75 53 65 6c |ommand.\|.MenuSel|
|00004bc0| 65 63 74 10 5c 07 6d 79 | 45 76 65 6e 74 52 5c 05 |ect.\.my|EventR\.|
|00004bd0| 77 68 65 72 65 16 16 08 | 98 01 94 01 7c 0b 00 00 |where...|....|...|
|00004be0| 3b 89 06 69 6e 44 72 61 | 67 08 4f bc 00 0d 00 00 |;..inDra|g.O.....|
|00004bf0| 00 00 a6 01 84 1d 0a 44 | 72 61 67 57 69 6e 64 6f |.......D|ragWindo|
|00004c00| 77 10 5c 0b 77 68 69 63 | 68 57 69 6e 64 6f 77 12 |w.\.whic|hWindow.|
|00004c10| 5c 07 6d 79 45 76 65 6e | 74 52 5c 05 77 68 65 72 |\.myEven|tR\.wher|
|00004c20| 65 12 5c 08 64 72 61 67 | 52 65 63 74 16 08 98 01 |e.\.drag|Rect....|
|00004c30| 94 01 7c 0c 00 00 3b 73 | 09 69 6e 43 6f 6e 74 65 |..|...;s|.inConte|
|00004c40| 6e 74 4e 44 00 0e 00 00 | 00 00 a6 01 7e 03 00 00 |ntND....|....~...|
|00004c50| 4f a4 86 0f 5c 0b 77 68 | 69 63 68 57 69 6e 64 6f |O...\.wh|ichWindo|
|00004c60| 77 46 5c 0b 46 72 6f 6e | 74 57 69 6e 64 6f 77 08 |wF\.Fron|tWindow.|
|00004c70| 84 0f 0c 53 65 6c 65 63 | 74 57 69 6e 64 6f 77 10 |...Selec|tWindow.|
|00004c80| 5c 0b 77 68 69 63 68 57 | 69 6e 64 6f 77 16 96 01 |\.whichW|indow...|
|00004c90| 7e 03 00 00 4f 92 84 12 | 0d 47 6c 6f 62 61 6c 54 |~...O...|.GlobalT|
|00004ca0| 6f 4c 6f 63 61 6c 10 5c | 07 6d 79 45 76 65 6e 74 |oLocal.\|.myEvent|
|00004cb0| 52 5c 05 77 68 65 72 65 | 16 08 98 01 80 1d 5c 06 |R\.where|......\.|
|00004cc0| 65 78 74 65 6e 64 0a 5c | 06 42 69 74 41 6e 64 10 |extend.\|.BitAnd.|
|00004cd0| 5c 07 6d 79 45 76 65 6e | 74 52 5c 09 6d 6f 64 69 |\.myEven|tR\.modi|
|00004ce0| 66 69 65 72 73 12 5c 08 | 73 68 69 66 74 4b 65 79 |fiers.\.|shiftKey|
|00004cf0| 16 46 5a 03 00 00 98 01 | 84 17 07 54 45 43 6c 69 |.FZ.....|...TECli|
|00004d00| 63 6b 10 5c 07 6d 79 45 | 76 65 6e 74 52 5c 05 77 |ck.\.myE|ventR\.w|
|00004d10| 68 65 72 65 12 5c 06 65 | 78 74 65 6e 64 12 5c 05 |here.\.e|xtend.\.|
|00004d20| 74 65 78 74 48 16 98 01 | 9a 01 98 01 92 07 00 00 |textH...|........|
|00004d30| 08 09 09 7b 65 6c 73 65 | 7d 7d 9a 01 98 01 92 0a |...{else|}}......|
|00004d40| 00 00 0e 09 09 09 7b 69 | 6e 43 6f 6e 74 65 6e 74 |......{i|nContent|
|00004d50| 7d 74 94 01 7c 0c 00 00 | 3b b7 08 69 6e 47 6f 41 |}t..|...|;..inGoA|
|00004d60| 77 61 79 08 00 00 00 11 | 00 00 00 00 a6 01 86 18 |way.....|........|
|00004d70| 5c 0b 54 72 61 63 6b 47 | 6f 41 77 61 79 10 5c 0b |\.TrackG|oAway.\.|
|00004d80| 77 68 69 63 68 57 69 6e | 64 6f 77 12 5c 07 6d 79 |whichWin|dow.\.my|
|00004d90| 45 76 65 6e 74 52 5c 05 | 77 68 65 72 65 16 84 0e |EventR\.|where...|
|00004da0| 0a 4b 69 6c 6c 57 69 6e | 64 6f 77 10 5c 0b 77 68 |.KillWin|dow.\.wh|
|00004db0| 69 63 68 57 69 6e 64 6f | 77 16 98 01 94 01 9c 01 |ichWindo|w.......|
|00004dc0| 92 34 00 00 62 09 09 7b | 61 64 64 65 64 20 74 6f |.4..b..{|added to|
|00004dd0| 20 73 61 74 69 73 66 79 | 20 4c 69 67 68 74 53 70 | satisfy| LightSp|
|00004de0| 65 65 64 73 20 43 41 53 | 45 20 73 74 61 74 65 6d |eeds CAS|E statem|
|00004df0| 65 6e 74 20 6e 65 65 64 | 73 2c 20 61 76 6f 69 64 |ent need|s, avoid|
|00004e00| 73 20 27 43 61 73 65 20 | 53 65 6c 65 63 74 6f 72 |s 'Case |Selector|
|00004e10| 20 52 61 6e 67 65 20 28 | 54 72 61 70 20 34 29 27 | Range (|Trap 4)'|
|00004e20| 20 65 72 72 6f 72 7d 00 | 9a 01 98 01 92 0c 00 00 | error}.|........|
|00004e30| 13 09 09 7b 63 61 73 65 | 20 46 69 6e 64 57 69 6e |...{case| FindWin|
|00004e40| 64 6f 77 7d 94 01 7a 0b | 00 00 12 cd 07 6b 65 79 |dow}..z.|.....key|
|00004e50| 44 6f 77 6e 50 c4 00 13 | 00 00 00 00 7c 0b 00 00 |DownP...|....|...|
|00004e60| 12 f7 07 61 75 74 6f 4b | 65 79 5c b8 00 13 00 00 |...autoK|ey\.....|
|00004e70| 00 00 a6 01 7e 03 00 00 | 51 d6 80 20 5c 07 74 68 |....~...|Q.. \.th|
|00004e80| 65 43 68 61 72 0a 5c 03 | 43 48 52 10 5c 06 42 69 |eChar.\.|CHR.\.Bi|
|00004e90| 74 41 6e 64 10 5c 07 6d | 79 45 76 65 6e 74 52 5c |tAnd.\.m|yEventR\|
|00004ea0| 07 6d 65 73 73 61 67 65 | 12 5c 0c 63 68 61 72 43 |.message|.\.charC|
|00004eb0| 6f 64 65 4d 61 73 6b 16 | 16 08 98 01 86 18 5c 06 |odeMask.|......\.|
|00004ec0| 42 69 74 41 6e 64 10 5c | 07 6d 79 45 76 65 6e 74 |BitAnd.\|.myEvent|
|00004ed0| 52 5c 09 6d 6f 64 69 66 | 69 65 72 73 12 5c 06 63 |R\.modif|iers.\.c|
|00004ee0| 6d 64 4b 65 79 16 46 08 | 5a 03 00 00 92 0d 00 00 |mdKey.F.|Z.......|
|00004ef0| 15 09 7b 73 65 65 20 69 | 66 20 43 4d 44 20 70 72 |..{see i|f CMD pr|
|00004f00| 65 73 73 65 64 7d 84 11 | 09 44 6f 43 6f 6d 6d 61 |essed}..|.DoComma|
|00004f10| 6e 64 10 5c 07 4d 65 6e | 75 4b 65 79 10 5c 07 74 |nd.\.Men|uKey.\.t|
|00004f20| 68 65 43 68 61 72 16 16 | 96 01 84 0e 05 54 45 4b |heChar..|.....TEK|
|00004f30| 65 79 10 5c 07 74 68 65 | 43 68 61 72 12 5c 05 74 |ey.\.the|Char.\.t|
|00004f40| 65 78 74 48 16 08 98 01 | 92 12 00 00 1f 09 7b 64 |extH....|......{d|
|00004f50| 72 61 77 20 74 68 65 20 | 63 68 61 72 61 63 74 65 |raw the |characte|
|00004f60| 72 20 69 6e 20 77 69 6e | 64 6f 77 7d 9a 01 98 01 |r in win|dow}....|
|00004f70| 92 10 00 00 1b 09 09 09 | 7b 6b 65 79 44 6f 77 6e |........|{keyDown|
|00004f80| 2c 20 61 75 74 6f 4b 65 | 79 20 62 65 67 69 6e 7d |, autoKe|y begin}|
|00004f90| 94 01 7c 0d 00 00 13 3f | 0b 61 63 74 69 76 61 74 |..|....?|.activat|
|00004fa0| 65 45 76 74 00 00 00 16 | 00 00 00 00 a6 01 7e 03 |eEvt....|......~.|
|00004fb0| 00 00 5c 98 86 1a 5c 06 | 42 69 74 41 6e 64 10 5c |..\...\.|BitAnd.\|
|00004fc0| 07 6d 79 45 76 65 6e 74 | 52 5c 09 6d 6f 64 69 66 |.myEvent|R\.modif|
|00004fd0| 69 65 72 73 12 5c 0a 61 | 63 74 69 76 65 46 6c 61 |iers.\.a|ctiveFla|
|00004fe0| 67 16 46 08 5a 03 00 00 | 92 18 00 00 2a 20 09 09 |g.F.Z...|....* ..|
|00004ff0| 7b 61 70 70 6c 69 63 61 | 74 69 6f 6e 20 77 69 6e |{applica|tion win|
|00005000| 64 6f 77 20 69 73 20 62 | 65 63 6f 6d 69 6e 67 20 |dow is b|ecoming |
|00005010| 61 63 74 69 76 65 7d f0 | 7e 03 00 00 58 ea 84 15 |active}.|~...X...|
|00005020| 07 53 65 74 50 6f 72 74 | 10 5c 07 47 72 61 66 50 |.SetPort|.\.GrafP|
|00005030| 74 72 10 5c 07 6d 79 45 | 76 65 6e 74 52 5c 07 6d |tr.\.myE|ventR\.m|
|00005040| 65 73 73 61 67 65 16 16 | 98 01 94 01 92 20 00 01 |essage..|..... ..|
|00005050| 3a 7b 42 45 4c 4f 57 20 | 49 53 20 54 48 45 20 4f |:{BELOW |IS THE O|
|00005060| 52 49 47 49 4e 41 4c 20 | 53 54 41 54 45 4d 45 4e |RIGINAL |STATEMEN|
|00005070| 54 20 57 48 49 43 48 20 | 4c 53 50 20 57 4f 55 4c |T WHICH |LSP WOUL|
|00005080| 44 4e 27 54 20 41 4c 4c | 4f 57 7d 00 92 20 00 01 |DN'T ALL|OW}.. ..|
|00005090| 3a 7b 74 65 78 74 48 20 | 3a 3d 20 54 45 48 61 6e |:{textH |:= TEHan|
|000050a0| 64 6c 65 20 28 57 69 6e | 64 6f 77 50 65 65 6b 20 |dle (Win|dowPeek |
|000050b0| 28 6d 79 45 76 65 6e 74 | 2e 6d 65 73 73 61 67 65 |(myEvent|.message|
|000050c0| 29 5e 2e 72 65 66 63 6f | 6e 3b 7d 00 94 01 92 1f |)^.refco|n;}.....|
|000050d0| 00 01 39 7b 54 48 45 53 | 45 20 41 52 45 20 54 48 |..9{THES|E ARE TH|
|000050e0| 45 20 46 49 58 45 44 20 | 53 54 41 54 45 4d 45 4e |E FIXED |STATEMEN|
|000050f0| 54 53 2c 20 43 4f 45 52 | 43 45 44 20 49 4e 54 4f |TS, COER|CED INTO|
|00005100| 20 41 43 43 45 50 54 41 | 4e 43 45 7d 80 18 5c 09 | ACCEPTA|NCE}..\.|
|00005110| 6d 79 57 69 6e 50 65 65 | 6b 0a 5c 0a 57 69 6e 64 |myWinPee|k.\.Wind|
|00005120| 6f 77 50 65 65 6b 10 5c | 07 6d 79 45 76 65 6e 74 |owPeek.\|.myEvent|
|00005130| 52 5c 07 6d 65 73 73 61 | 67 65 16 08 98 01 92 0d |R\.messa|ge......|
|00005140| 00 00 14 09 7b 63 6f 65 | 72 63 65 64 20 73 74 61 |....{coe|rced sta|
|00005150| 74 65 6d 65 6e 74 7d 49 | 80 12 5c 09 74 68 65 52 |tement}I|..\.theR|
|00005160| 65 66 63 6f 6e 0a 5c 09 | 6d 79 57 69 6e 50 65 65 |efcon.\.|myWinPee|
|00005170| 6b 54 52 5c 06 72 65 66 | 63 6f 6e 08 98 01 92 0f |kTR\.ref|con.....|
|00005180| 00 00 18 09 09 09 09 09 | 7b 63 6f 65 72 63 65 64 |........|{coerced|
|00005190| 20 73 74 61 74 65 6d 65 | 6e 74 7d 43 80 11 5c 05 | stateme|nt}C..\.|
|000051a0| 74 65 78 74 48 0a 5c 08 | 54 45 48 61 6e 64 6c 65 |textH.\.|TEHandle|
|000051b0| 10 5c 09 74 68 65 52 65 | 66 63 6f 6e 16 08 98 01 |.\.theRe|fcon....|
|000051c0| 92 12 00 00 1e 09 09 09 | 7b 6d 6f 64 69 66 65 64 |........|{modifed|
|000051d0| 2f 63 6f 65 72 63 65 64 | 20 73 74 61 74 65 6d 65 |/coerced| stateme|
|000051e0| 6e 74 7d 65 94 01 84 17 | 0a 45 6e 61 62 6c 65 49 |nt}e....|.EnableI|
|000051f0| 74 65 6d 10 5c 07 6d 79 | 4d 65 6e 75 73 18 5c 05 |tem.\.my|Menus.\.|
|00005200| 66 69 6c 65 4d 1c 12 5c | 09 63 6c 6f 73 65 49 74 |fileM..\|.closeIt|
|00005210| 65 6d 16 08 98 01 84 17 | 0b 44 69 73 61 62 6c 65 |em......|.Disable|
|00005220| 49 74 65 6d 10 5c 07 6d | 79 4d 65 6e 75 73 18 5c |Item.\.m|yMenus.\|
|00005230| 05 65 64 69 74 4d 1c 12 | 5c 08 75 6e 64 6f 49 74 |.editM..|\.undoIt|
|00005240| 65 6d 16 08 98 01 94 01 | 92 20 00 01 3a 7b 42 45 |em......|. ..:{BE|
|00005250| 4c 4f 57 20 49 53 20 54 | 48 45 20 4f 52 49 47 49 |LOW IS T|HE ORIGI|
|00005260| 4e 41 4c 20 53 54 41 54 | 45 4d 45 4e 54 20 57 48 |NAL STAT|EMENT WH|
|00005270| 49 43 48 20 4c 53 50 20 | 57 4f 55 4c 44 4e 27 54 |ICH LSP |WOULDN'T|
|00005280| 20 41 4c 4c 4f 57 7d 7b | 92 22 00 01 3f 7b 69 66 | ALLOW}{|."..?{if|
|00005290| 20 57 69 6e 64 6f 77 50 | 65 65 6b 20 28 46 72 6f | WindowP|eek (Fro|
|000052a0| 6e 74 57 69 6e 64 6f 77 | 29 20 5e 2e 6e 65 78 74 |ntWindow|) ^.next|
|000052b0| 57 69 6e 64 6f 77 5e 2e | 77 69 6e 64 6f 77 4b 69 |Window^.|windowKi|
|000052c0| 6e 64 20 3c 20 30 20 74 | 68 65 6e 7d 94 01 92 21 |nd < 0 t|hen}...!|
|000052d0| 00 01 3d 7b 42 45 4c 4f | 57 20 41 52 45 20 54 48 |..={BELO|W ARE TH|
|000052e0| 45 20 43 4f 45 52 43 45 | 44 20 53 54 41 54 45 4d |E COERCE|D STATEM|
|000052f0| 45 4e 54 53 20 4e 45 45 | 44 45 44 20 54 4f 20 4d |ENTS NEE|DED TO M|
|00005300| 41 4b 45 20 4c 53 50 20 | 54 41 4b 45 20 49 54 7d |AKE LSP |TAKE IT}|
|00005310| 80 15 5c 0a 6d 79 57 69 | 6e 50 65 65 6b 32 0a 5c |..\.myWi|nPeek2.\|
|00005320| 0a 57 69 6e 64 6f 77 50 | 65 65 6b 10 5c 0b 46 72 |.WindowP|eek.\.Fr|
|00005330| 6f 6e 74 57 69 6e 64 6f | 77 16 98 01 92 0d 00 00 |ontWindo|w.......|
|00005340| 15 09 09 7b 63 6f 65 72 | 63 65 64 20 73 74 61 74 |...{coer|ced stat|
|00005350| 65 6d 65 6e 74 7d 80 15 | 5c 0a 6d 79 57 69 6e 50 |ement}..|\.myWinP|
|00005360| 65 65 6b 33 0a 5c 0a 6d | 79 57 69 6e 50 65 65 6b |eek3.\.m|yWinPeek|
|00005370| 32 54 52 5c 0a 6e 65 78 | 74 57 69 6e 64 6f 77 08 |2TR\.nex|tWindow.|
|00005380| 98 01 92 0d 00 00 15 09 | 09 7b 63 6f 65 72 63 65 |........|.{coerce|
|00005390| 64 20 73 74 61 74 65 6d | 65 6e 74 7d 86 08 5c 0a |d statem|ent}..\.|
|000053a0| 6d 79 57 69 6e 50 65 65 | 6b 33 46 58 92 1d 00 00 |myWinPee|k3FX....|
|000053b0| 34 09 09 7b 74 65 73 74 | 20 74 6f 20 6d 61 6b 65 |4..{test| to make|
|000053c0| 20 73 75 72 65 20 74 68 | 65 72 65 20 72 65 61 6c | sure th|ere real|
|000053d0| 6c 79 20 69 73 20 61 6e | 6f 74 68 65 72 20 77 69 |ly is an|other wi|
|000053e0| 6e 64 6f 77 7d 4e 86 11 | 5c 0a 6d 79 57 69 6e 50 |ndow}N..|\.myWinP|
|000053f0| 65 65 6b 33 54 52 5c 0a | 77 69 6e 64 6f 77 4b 69 |eek3TR\.|windowKi|
|00005400| 6e 64 48 08 5a 03 00 00 | 92 14 00 00 22 09 09 09 |ndH.Z...|...."...|
|00005410| 7b 69 66 20 3c 20 30 2c | 20 69 74 27 73 20 61 20 |{if < 0,| it's a |
|00005420| 64 65 73 6b 20 61 63 63 | 65 73 73 6f 72 79 7d 69 |desk acc|essory}i|
|00005430| 94 01 80 0e 5c 0a 73 63 | 72 43 6f 70 79 45 72 72 |....\.sc|rCopyErr|
|00005440| 0a 5c 0b 54 45 46 72 6f | 6d 53 63 72 61 70 98 01 |.\.TEFro|mScrap..|
|00005450| 92 16 00 00 27 09 09 7b | 63 6f 70 79 20 66 72 6f |....'..{|copy fro|
|00005460| 6d 20 74 68 65 20 64 65 | 73 6b 20 61 63 63 65 73 |m the de|sk acces|
|00005470| 73 6f 72 79 20 73 63 72 | 61 70 20 7d 92 1c 00 01 |sory scr|ap }....|
|00005480| 32 09 09 09 09 09 09 09 | 09 09 09 09 09 09 09 7b |2.......|.......{|
|00005490| 20 69 66 20 74 68 65 20 | 44 41 20 69 73 20 6f 70 | if the |DA is op|
|000054a0| 65 6e 20 62 75 74 20 64 | 65 61 63 74 69 76 61 74 |en but d|eactivat|
|000054b0| 65 64 7d 0d 92 19 00 01 | 2d 09 09 09 09 09 09 09 |ed}.....|-.......|
|000054c0| 09 09 09 09 09 09 09 7b | 20 77 69 74 68 20 53 68 |.......{| with Sh|
|000054d0| 6f 77 4f 66 66 20 77 69 | 6e 64 6f 77 73 20 70 72 |owOff wi|ndows pr|
|000054e0| 65 73 65 6e 74 7d 9a 01 | 92 11 00 00 1c 09 09 09 |esent}..|........|
|000054f0| 7b 69 66 20 42 69 74 41 | 6e 64 2e 2e 2e 2e 74 68 |{if BitA|nd....th|
|00005500| 65 6e 20 62 65 67 69 6e | 7d 2e 94 01 96 01 92 19 |en begin|}.......|
|00005510| 00 00 2d 20 09 09 09 7b | 61 70 70 6c 69 63 61 74 |..- ...{|applicat|
|00005520| 69 6f 6e 20 77 69 6e 64 | 6f 77 20 69 73 20 62 65 |ion wind|ow is be|
|00005530| 63 6f 6d 69 6e 67 20 69 | 6e 61 63 74 69 76 65 7d |coming i|nactive}|
|00005540| 7e 03 00 00 5c 80 94 01 | 92 21 00 01 3c 7b 42 45 |~...\...|.!..<{BE|
|00005550| 4c 4f 57 20 41 52 45 20 | 54 48 45 20 4f 52 49 47 |LOW ARE |THE ORIG|
|00005560| 49 4e 41 4c 20 53 54 41 | 54 45 4d 45 4e 54 53 20 |INAL STA|TEMENTS |
|00005570| 57 48 49 43 48 20 4c 53 | 50 20 57 4f 55 4c 44 4e |WHICH LS|P WOULDN|
|00005580| 27 54 20 41 4c 4c 4f 57 | 7d 72 92 22 00 01 3f 7b |'T ALLOW|}r."..?{|
|00005590| 54 45 44 65 61 63 74 69 | 76 61 74 65 28 54 45 48 |TEDeacti|vate(TEH|
|000055a0| 61 6e 64 6c 65 28 57 69 | 6e 64 6f 77 50 65 65 6b |andle(Wi|ndowPeek|
|000055b0| 28 6d 79 45 76 65 6e 74 | 2e 6d 65 73 73 61 67 65 |(myEvent|.message|
|000055c0| 29 5e 2e 72 65 66 63 6f | 6e 29 29 3b 09 7d 92 1a |)^.refco|n));.}..|
|000055d0| 00 01 2f 7b 69 66 20 57 | 69 6e 64 6f 77 50 65 65 |../{if W|indowPee|
|000055e0| 6b 20 28 46 72 6f 6e 74 | 57 69 6e 64 6f 77 29 5e |k (Front|Window)^|
|000055f0| 2e 77 69 6e 64 6f 77 4b | 69 6e 64 20 3c 20 30 20 |.windowK|ind < 0 |
|00005600| 20 7d 94 01 92 1e 00 01 | 36 7b 42 45 4c 4f 57 20 | }......|6{BELOW |
|00005610| 41 52 45 20 54 48 45 20 | 43 4f 45 52 43 45 44 20 |ARE THE |COERCED |
|00005620| 53 54 41 54 45 4d 45 4e | 54 53 20 54 4f 20 4d 41 |STATEMEN|TS TO MA|
|00005630| 4b 45 20 4c 53 50 20 54 | 41 4b 45 20 49 54 7d 74 |KE LSP T|AKE IT}t|
|00005640| 80 18 5c 09 6d 79 57 69 | 6e 50 65 65 6b 0a 5c 0a |..\.myWi|nPeek.\.|
|00005650| 57 69 6e 64 6f 77 50 65 | 65 6b 10 5c 07 6d 79 45 |WindowPe|ek.\.myE|
|00005660| 76 65 6e 74 52 5c 07 6d | 65 73 73 61 67 65 16 08 |ventR\.m|essage..|
|00005670| 98 01 92 0a 00 00 0f 09 | 7b 66 6f 72 20 63 6f 65 |........|{for coe|
|00005680| 72 63 69 6f 6e 7d 80 12 | 5c 09 74 68 65 52 65 66 |rcion}..|\.theRef|
|00005690| 63 6f 6e 0a 5c 09 6d 79 | 57 69 6e 50 65 65 6b 54 |con.\.my|WinPeekT|
|000056a0| 52 5c 06 72 65 66 63 6f | 6e 08 98 01 92 0c 00 00 |R\.refco|n.......|
|000056b0| 13 09 09 09 09 09 7b 66 | 6f 72 20 63 6f 65 72 63 |......{f|or coerc|
|000056c0| 69 6f 6e 7d 84 14 0c 54 | 45 44 65 61 63 74 69 76 |ion}...T|EDeactiv|
|000056d0| 61 74 65 10 5c 08 54 45 | 48 61 6e 64 6c 65 10 5c |ate.\.TE|Handle.\|
|000056e0| 09 74 68 65 52 65 66 63 | 6f 6e 16 16 98 01 92 0e |.theRefc|on......|
|000056f0| 00 00 16 09 09 7b 63 6f | 65 72 65 63 65 64 20 73 |.....{co|ereced s|
|00005700| 74 61 74 65 6d 65 6e 74 | 7d 9e 94 01 80 15 5c 0a |tatement|}.....\.|
|00005710| 6d 79 57 69 6e 50 65 65 | 6b 32 0a 5c 0a 57 69 6e |myWinPee|k2.\.Win|
|00005720| 64 6f 77 50 65 65 6b 10 | 5c 0b 46 72 6f 6e 74 57 |dowPeek.|\.FrontW|
|00005730| 69 6e 64 6f 77 16 98 01 | 92 12 00 00 1f 09 09 7b |indow...|.......{|
|00005740| 73 70 65 63 69 61 6c 20 | 63 6f 65 72 63 69 6f 6e |special |coercion|
|00005750| 20 73 74 61 74 65 6d 65 | 6e 74 73 7d 80 15 5c 0a | stateme|nts}..\.|
|00005760| 74 68 65 57 69 6e 4b 69 | 6e 64 0a 5c 0a 6d 79 57 |theWinKi|nd.\.myW|
|00005770| 69 6e 50 65 65 6b 32 54 | 52 5c 0a 77 69 6e 64 6f |inPeek2T|R\.windo|
|00005780| 77 4b 69 6e 64 08 98 01 | 92 0b 00 00 11 09 09 09 |wKind...|........|
|00005790| 7b 66 6f 72 20 63 6f 65 | 72 63 69 6f 6e 7d 86 0a |{for coe|rcion}..|
|000057a0| 5c 0a 74 68 65 57 69 6e | 4b 69 6e 64 48 08 5a 03 |\.theWin|KindH.Z.|
|000057b0| 00 00 92 14 00 00 22 09 | 09 09 7b 69 66 20 3c 20 |......".|..{if < |
|000057c0| 30 2c 20 69 74 27 73 20 | 61 20 64 65 73 6b 20 61 |0, it's |a desk a|
|000057d0| 63 63 65 73 73 6f 72 79 | 7d 00 94 01 7e 03 00 00 |ccessory|}...~...|
|000057e0| 5c 4c 84 16 0a 45 6e 61 | 62 6c 65 49 74 65 6d 10 |\L...Ena|bleItem.|
|000057f0| 5c 07 6d 79 4d 65 6e 75 | 73 18 5c 05 65 64 69 74 |\.myMenu|s.\.edit|
|00005800| 4d 1c 12 5c 08 75 6e 64 | 6f 49 74 65 6d 16 98 01 |M..\.und|oItem...|
|00005810| 80 0c 5c 08 73 63 72 61 | 70 45 72 72 0a 5c 09 5a |..\.scra|pErr.\.Z|
|00005820| 65 72 6f 53 63 72 61 70 | 98 01 80 0d 5c 0a 73 63 |eroScrap|....\.sc|
|00005830| 72 43 6f 70 79 45 72 72 | 0a 5c 09 54 45 54 6f 53 |rCopyErr|.\.TEToS|
|00005840| 63 72 61 70 98 01 9a 01 | 92 13 00 00 21 20 09 09 |crap....|....! ..|
|00005850| 09 7b 69 66 20 57 69 6e | 64 6f 77 50 65 65 6b 2e |.{if Win|dowPeek.|
|00005860| 2e 2e 2e 74 68 65 6e 20 | 62 65 67 69 6e 7d 96 01 |...then |begin}..|
|00005870| 84 17 0b 44 69 73 61 62 | 6c 65 49 74 65 6d 10 5c |...Disab|leItem.\|
|00005880| 07 6d 79 4d 65 6e 75 73 | 18 5c 05 65 64 69 74 4d |.myMenus|.\.editM|
|00005890| 1c 12 5c 08 75 6e 64 6f | 49 74 65 6d 16 08 98 01 |..\.undo|Item....|
|000058a0| 9a 01 98 01 92 0a 00 00 | 0e 09 09 7b 65 6c 73 65 |........|...{else|
|000058b0| 20 62 65 67 69 6e 7d 00 | 9a 01 98 01 92 0e 00 00 | begin}.|........|
|000058c0| 16 09 09 09 7b 61 63 74 | 69 76 61 74 65 45 76 74 |....{act|ivateEvt|
|000058d0| 20 62 65 67 69 6e 7d 03 | 94 01 7c 0c 00 00 00 00 | begin}.|..|.....|
|000058e0| 09 75 70 64 61 74 65 45 | 76 74 00 00 00 00 00 00 |.updateE|vt......|
|000058f0| 00 00 a6 01 7e 03 00 00 | 00 00 84 18 0b 42 65 67 |....~...|.....Beg|
|00005900| 69 6e 55 70 64 61 74 65 | 10 5c 09 57 69 6e 64 6f |inUpdate|.\.Windo|
|00005910| 77 50 74 72 10 5c 07 6d | 79 45 76 65 6e 74 52 5c |wPtr.\.m|yEventR\|
|00005920| 07 6d 65 73 73 61 67 65 | 16 16 98 01 94 01 92 21 |.message|.......!|
|00005930| 00 01 3c 7b 42 45 4c 4f | 57 20 41 52 45 20 54 48 |..<{BELO|W ARE TH|
|00005940| 45 20 4f 52 49 47 49 4e | 41 4c 20 53 54 41 54 45 |E ORIGIN|AL STATE|
|00005950| 4d 45 4e 54 53 20 57 48 | 49 43 48 20 4c 53 50 20 |MENTS WH|ICH LSP |
|00005960| 57 4f 55 4c 44 4e 27 54 | 20 41 4c 4c 4f 57 7d 00 |WOULDN'T| ALLOW}.|
|00005970| 92 1e 00 01 36 7b 45 72 | 61 73 65 52 65 63 74 20 |....6{Er|aseRect |
|00005980| 28 57 69 6e 64 6f 77 50 | 74 72 28 6d 79 45 76 65 |(WindowP|tr(myEve|
|00005990| 6e 74 2e 6d 65 73 73 61 | 67 65 29 20 5e 2e 70 6f |nt.messa|ge) ^.po|
|000059a0| 72 74 52 65 63 74 29 3b | 20 20 7d 00 92 1c 00 01 |rtRect);|  }.....|
|000059b0| 33 7b 54 45 55 70 64 61 | 74 65 20 28 57 69 6e 64 |3{TEUpda|te (Wind|
|000059c0| 6f 77 50 74 72 20 28 6d | 79 45 76 65 6e 74 2e 6d |owPtr (m|yEvent.m|
|000059d0| 65 73 73 61 67 65 29 5e | 2e 70 6f 72 74 52 65 63 |essage)^|.portRec|
|000059e0| 74 2c 20 7d 92 20 00 01 | 3a 7b 20 20 20 20 20 54 |t, }. ..|:{     T|
|000059f0| 45 48 61 6e 64 6c 65 20 | 28 57 69 6e 64 6f 77 50 |EHandle |(WindowP|
|00005a00| 65 65 6b 20 28 6d 79 45 | 76 65 6e 74 2e 6d 65 73 |eek (myE|vent.mes|
|00005a10| 73 61 67 65 29 5e 2e 72 | 65 66 63 6f 6e 29 29 3b |sage)^.r|efcon));|
|00005a20| 20 20 7d 7d 94 01 92 21 | 00 01 3d 7b 42 45 4c 4f |  }}...!|..={BELO|
|00005a30| 57 20 41 52 45 20 54 48 | 45 20 43 4f 45 52 43 45 |W ARE TH|E COERCE|
|00005a40| 44 20 53 54 41 54 45 4d | 45 4e 54 53 20 4e 45 45 |D STATEM|ENTS NEE|
|00005a50| 44 45 44 20 54 4f 20 4d | 41 4b 45 20 4c 53 50 20 |DED TO M|AKE LSP |
|00005a60| 54 41 4b 45 20 49 54 7d | 80 17 5c 08 6d 79 57 69 |TAKE IT}|..\.myWi|
|00005a70| 6e 50 74 72 0a 5c 09 57 | 69 6e 64 6f 77 50 74 72 |nPtr.\.W|indowPtr|
|00005a80| 10 5c 07 6d 79 45 76 65 | 6e 74 52 5c 07 6d 65 73 |.\.myEve|ntR\.mes|
|00005a90| 73 61 67 65 16 08 98 01 | 92 0b 00 00 10 09 09 7b |sage....|.......{|
|00005aa0| 66 6f 72 20 63 6f 65 72 | 63 69 6f 6e 7d 20 80 11 |for coer|cion} ..|
|00005ab0| 5c 07 74 68 65 52 65 63 | 74 0a 5c 08 6d 79 57 69 |\.theRec|t.\.myWi|
|00005ac0| 6e 50 74 72 54 52 5c 08 | 70 6f 72 74 52 65 63 74 |nPtrTR\.|portRect|
|00005ad0| 98 01 92 0c 00 00 13 09 | 09 09 09 09 7b 66 6f 72 |........|....{for|
|00005ae0| 20 63 6f 65 72 63 69 6f | 6e 7d 84 0c 09 45 72 61 | coercio|n}...Era|
|00005af0| 73 65 52 65 63 74 10 5c | 07 74 68 65 52 65 63 74 |seRect.\|.theRect|
|00005b00| 16 08 98 01 92 11 00 00 | 1c 09 09 09 09 09 09 09 |........|........|
|00005b10| 09 09 7b 63 6f 65 72 63 | 65 64 20 73 74 61 74 65 |..{coerc|ed state|
|00005b20| 6d 65 6e 74 7d 6f 94 01 | 80 18 5c 09 6d 79 57 69 |ment}o..|..\.myWi|
|00005b30| 6e 50 65 65 6b 0a 5c 0a | 57 69 6e 64 6f 77 50 65 |nPeek.\.|WindowPe|
|00005b40| 65 6b 10 5c 07 6d 79 45 | 76 65 6e 74 52 5c 07 6d |ek.\.myE|ventR\.m|
|00005b50| 65 73 73 61 67 65 16 08 | 98 01 92 0a 00 00 0f 09 |essage..|........|
|00005b60| 7b 66 6f 72 20 63 6f 65 | 72 63 69 6f 6e 7d 80 12 |{for coe|rcion}..|
|00005b70| 5c 09 74 68 65 52 65 66 | 63 6f 6e 0a 5c 09 6d 79 |\.theRef|con.\.my|
|00005b80| 57 69 6e 50 65 65 6b 54 | 52 5c 06 72 65 66 63 6f |WinPeekT|R\.refco|
|00005b90| 6e 08 98 01 92 0c 00 00 | 13 09 09 09 09 09 7b 66 |n.......|......{f|
|00005ba0| 6f 72 20 63 6f 65 72 63 | 69 6f 6e 7d 84 17 08 54 |or coerc|ion}...T|
|00005bb0| 45 55 70 64 61 74 65 10 | 5c 07 74 68 65 52 65 63 |EUpdate.|\.theRec|
|00005bc0| 74 12 5c 08 54 45 48 61 | 6e 64 6c 65 10 5c 09 74 |t.\.TEHa|ndle.\.t|
|00005bd0| 68 65 52 65 66 63 6f 6e | 16 16 98 01 92 0e 00 00 |heRefcon|........|
|00005be0| 16 09 09 09 7b 63 6f 65 | 72 63 65 64 20 73 74 61 |....{coe|rced sta|
|00005bf0| 74 65 6d 65 6e 74 7d 52 | 94 01 84 17 09 45 6e 64 |tement}R|.....End|
|00005c00| 55 70 64 61 74 65 10 5c | 09 57 69 6e 64 6f 77 50 |Update.\|.WindowP|
|00005c10| 74 72 10 5c 07 6d 79 45 | 76 65 6e 74 52 5c 07 6d |tr.\.myE|ventR\.m|
|00005c20| 65 73 73 61 67 65 16 16 | 98 01 9a 01 98 01 92 0c |essage..|........|
|00005c30| 00 00 13 09 09 7b 75 70 | 64 61 74 65 45 76 74 20 |.....{up|dateEvt |
|00005c40| 62 65 67 69 6e 7d 9c 01 | 92 34 00 00 62 09 09 7b |begin}..|.4..b..{|
|00005c50| 61 64 64 65 64 20 74 6f | 20 73 61 74 69 73 66 79 |added to| satisfy|
|00005c60| 20 4c 69 67 68 74 53 70 | 65 65 64 73 20 43 41 53 | LightSp|eeds CAS|
|00005c70| 45 20 73 74 61 74 65 6d | 65 6e 74 20 6e 65 65 64 |E statem|ent need|
|00005c80| 73 2c 20 61 76 6f 69 64 | 73 20 27 43 61 73 65 20 |s, avoid|s 'Case |
|00005c90| 53 65 6c 65 63 74 6f 72 | 20 52 61 6e 67 65 20 28 |Selector| Range (|
|00005ca0| 54 72 61 70 20 34 29 27 | 20 65 72 72 6f 72 7d 3d |Trap 4)'| error}=|
|00005cb0| 94 01 9a 01 98 01 92 0d | 00 00 15 09 09 7b 63 61 |........|.....{ca|
|00005cc0| 73 65 20 6d 79 45 76 65 | 6e 74 2e 77 68 61 74 7d |se myEve|nt.what}|
|00005cd0| 94 01 74 06 5c 08 64 6f | 6e 65 46 6c 61 67 98 01 |..t.\.do|neFlag..|
|00005ce0| 9a 01 00 01 02 01       |                         |......  |        |
+--------+-------------------------+-------------------------+--------+--------+